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Enitorial Jssue 5 


WELCOME TO ISSUE FIVE OF PRINT-OUT 


Once again I am writing the editorial to another issue 
of Print-Out - it hardly seems as if 2 months can have 
passed. However, this is the largest issue to data and 
several new series have started which we hope that you 
will enjoy !!! We are still looking for more people to 
help with the magazine, especially with articles to do 
with BASIC programming. Again we would like to express 
our thanks to Bob Taylor, who has again contributed to 
this issue, and also to Alan Scully & Richard Sergeant 
who have both written articles for Issue Five. 


Issue Six (is it really that many?!) will hopefully be 
completed by about the 30th July. If you wish to order 
a copy of this in advance, then please send one of the 
following :- 

a) 70p plus an A4 SAE (with a 28p stamp) 

b) £1.10 which includes postage & packing 
For more details of this and other offers, please turn 
turn to the 'Offers' & 'Subscriptions' sections at the 
back of the magazine. For those of you who don't know, 
we advertise each new issue of the magazine in Amstrad 
Action's Small Ads section about once every two months. 


Of course, if you have any questions or problems conc— 
erning the CPC then please do not hesitate to write to 
us at the address below and we'll do our best to solve 
it. The same address should also be used for any other 
magazine related enquiry. 


The address to write to is :- 
PRINT-OUT, 8 Maze Green Road, 
Bishop's Stortford, 
Herts CM23 2FJ. 


_Beginner’s BASIC 


We have now looked at about twenty BASIC commands and studied some of their 
uses. In this issue, I plan to introduce a few more commands & also consolidate 
some of the points we have already covered. 

In a large program, there might be some parts which need to be used several 
times during its execution or, perhaps, a section of it which has to be access— 
ed from different places. If we wanted to, we could write out these bits of the 
program over and over again whenever we wanted to use them. However, this would 
make the program much longer than necessary and possibly more complicated. Ina 
Simple program. such as below, you can see that several parts are the same. 


1@ INPUT "What is your first number “:numberl 
20 INPUT "What is your second number ":number2 
30 average= (number 1+number2) /2 

4@ PRINT "The average of your two numbers is" raveraqe 
5@ total=averaqe 

6@ INPUT "What is your first number ":numberi 

7@ INPUT "What is your second number ''snumberz 

8@ average= (number itnumber2) /2 

96 PRINT "The average of your two numbers is":averaqe 
140 total=total+average 

11@ INPUT "What is your first number '“:numberi 

12@ INPUT “What is your second number ":numberZ 

13@ average= (number 1+number2) /2 

14@ PRINT "The average of your two numbers is':averade 
15@ total=totalt+taverage 

160 PRINT "The total of your three averages is":total 


It would save time and space if these lines only needed to be entered once. 
Fortunately. there's a way to do this and it uses an idea known as a SUBROUTINE 
and needs two new commands GOSUB and RETURN. Look at the lising below. 


1@ GOSUB 90 

2@ total=average 

3®@ GOSUB 9a 

total=totalt+average 

GOSUB 9 

total=totalt+average 

7®@ PRINT “The total of your two averages is":total 
80 END 

9@ INPUT "What is your first number ':number1l 

10@ INPUT “What is your second number “:number2 
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110 average= (number i+number2) /2 
120 PRINT "The average of your two numbers is“:average 
13@ RETURN 


Although this program is not very useful, it does illustrate the benefit of 
subroutines very well, and is probably one of the shortest programs to do this. 
The obvious advantage is that it's three lines shorter but there are other ben- 
efits which we will deal with later. First of all. we need to look at the three 
new commands that we've included. GOSUB, END and RETURN. 

GOSUB occurs in lines 16,30,5@. It stands for GOto SUBroutine and is always 
followed by a line number. When the computer encounters this command. it checks 
to see if the specified line number exists (and if not it tells you that it has 
a problem). If it finds the correct line number in the program, it qoes to that 
line, missing out any of the program in between, and starts executing the prog- 
ram from its new position. However, at the same, it stores the line number from 
which it jumped for later reference. It then executes the instructions which it 
finds in the subroutine (in the above example the subroutine lasts from line 9¢@ 
to line 13@ and in line 1@ the instruction GOSUB 9@ tells the computer to go to 
line 9@ ie. the start of the subroutine). 

When it next encounters a RETURN command, it finds out where it last used a 
GOSUB command and then goes back to the line after the one which contained the 
actual GOSUB command. The smali diagram below will hopefully make this clearer. 


1@ GOSUB 99 
20 Next line of the proaqram after GOSUB 
Ss 


» 88 END 

9@ This is where the subroutine starts 
10@ Instructions in the subroutine that 
11@ are executed as normal until it has 
12@ a RETURN command. 

13@ RETURN 


Line 8@ also contains a new command, END. There are no prizes for quessing 
what this does; it ends the program. When the computer encounters END it stops 
the computer from executing any more commands from the program until it is RUN 
again. The reason for this is very important if we look at the operating order 
of the program. 


1. Line 1@ sends the computer to line 9@. 


2. It executes the instructions from line 98 to 13@ until it meets a RETURN 
command at which point it jumps back to line 20 (executed normally). 

3. When it executes line 30 it goes to line 90. 

4. It now does the same as it did in part two except it now RETURNs to 40. 

5. Line 50 tells the computer to GO to the SUBroutine at line 90 

6. The computer now does part two again but returns to line 6@. 

7. Line 70 is executed normally. 

8. Line 8@ now ends the execution of the program in order to stop the comp— 


uter accidentally doing iines 9¢ to 128 again. 


When the computer gets to line 80, unless there was an END command it would 
just carry on executing lines 9@ to 12@ as if they were part of the normal pro- 
gram rather than a special subroutine. If the computer tried to run line 130 it 
would not be able to find a GOSUB command which had told it to go to line 90, & 
it would thus be unable to RETURN and would print up an error messaqe. 

With a program it is possible to have large numbers of subroutines that are 
either jumped to (using GOSUB) separately or indeed from within another subrou-— 
tine. Look at the program below. 

1@ INPUT "What is your name “snames 

20 GOSUB 70 

3@ INPUT "What is your friend’s name ";names 

4@ GOSUB 118 

3@ PRINT "IT think I will like “;name#; 

6@ END 

7@ PRINT “That is a nice name "'s 
8@ GOSUB 110 

9@ PRINT names 

100 RETURN 

110 nameS=UPPERS (names) 

12@ RETURN 


Again this is not a very exciting program but it illustrates another useful 
point to do with subroutines — the same subroutine can be used from a different 
part of the program and ina slightly different way. It also shows that you can 
have more than one subroutine in a program at a time and also reuse variables. 

If you study the above program and follow its path of execution, you should 
be able to see that there is one subroutine from 7@-10@ and another from 110 to 
120. The first subroutine is called from the main program, prints some text and 
then goes to the second subroutine. Now. when a RETURN is met in the 2nd subro— 
utine, the program jumps back to line 9@ in the first subroutine. It prints out 
a string (which was made into capital letters by line 11@) and then returns to 
the main program. Line 4@ executes the second suboutine directly without having 
to go throught the first subroutine and when the RETURN is encountered the con— 
puter goes back to line 5@. 

Although this may sound quite complicated, if you trace the program's path 
with your finger and obey the instructions (such as the GOSUBs and the RETURNs) 
you will see that it really does work. However, BASIC has an easy way of remov— 
ing any confusion over subroutines — the REM command. In order to see it work, 
enter or alter these lines to the above program. 

20 GOSUB 7® : REM Print message and convert to uppercase 

4@ GOSUB 110 : REM Convert string to uppercase 

8@ GOSUB 110 : REM Convert string to uppercase 

69 REM Subroutine to print message and convert to uppercase 

109 REM Subroutine to convert to uppercase 
With REM the computer ignores everything after the REM and so this will have no 
effect at all on the way the program runs. See you in a couple of months time. 


HOMEBREW SOFTWARE 


Rebou nN d = By ALAN SCULLY 


(Price — £2 on tape or £4 on disc) 


This is an excellent game from Alan Scully who, with Rebound and his other 
progam ‘One Arm Bandit Simulator' has proved himself to be a most professicnal 
games writer. 

Rebound 18 a game of patience & skill requiring the player to Knock 4 pail 
around the screen and it can bounce off the wails making bricks disappear when 
the bali hits them. The gameplay is simple and easv to understand with over 40 
different screen layouts. Tne screens themselves are well laid out, neatly and 
professionally done. All the information needed is clear and unciuttered so at 
a glance the necessary facts can be easily seen. 

The actual game screen 1s made up of bricks that together form some shape 
or pattern. The aim of the game is to hit all the bricks (some more than once) 
without loosing a life. Once they have ail disappeared the player moves on to 
the next screen. A password is needed every ten screens. Unlike most games or 
this type there is no bat & a ball ig: iost when it passes through a small hole 
at the base of the screen. When the bail hits the base, either by bouncing ta 
the ground or by being recalled by the player. it moves quickly towards one of 
the holes and it is upto the player to launch it in time. 

The gameplay is made more interesting by the fact that behind some of the 
bricks lies a special biock which, when collected. jiights up an icon. When the 
desired icon is activated. it either siows down the speed of the pail. blocks 
up the exit, adds blocks to the screen or gives you a bonus life. 

Rebound is so good that I aimost forgot I was pliaving a nomebrew game & it 
is a credit to Alan Scully that ne nas managed to produce a most professional 
piece of software. 

Having said that, I found the qame slightly tedious & frustrating at times. 
especially when just one brick was left on the screen — sometimes I was knock-— 
ing the ball around the screen for at least ten minutes! Knowing the passwords 
solved this problem patos vig ee east ee eG 
as I could get onto 
the more exciting & 
challenging screens. 
But with a price of 
only £2 (tape) & £4 
(disc) who can fail 
to gain if they buy 
this game ?!! It is § 
excellent in almost i. 
every respect ! 


ooonobooo 
LEVEL oO1 


One Arm Bandit 
: - BY ALAN SCULLY 
Simulator (Frice — £Z on tape or £4 on disc) 


This is the second of Alan Scully's nomeprew games. The gameplay this time 
does not involve balls and bricks but fruit machines and gambling!!! 

Unlike Rebound, this game does not have a proper ioading screen. put clear 
instructions do appear before the game is piayed. The screen layout itself is 
good with clear graphics but 1s pernaps slightly cluttered. it gives the impr- 
ession that too much has been crammed into too small a space. 

It took me a while to know exactly what was happening as tne instructions. 
although clear, were concise and did not tell you everything — there is a cer- 
tain amount of working out needed on the player’s part. But the game 15 run to 
play & it really does generate excitement wnen the player wins or loses money. 
There are a number of choices available to the piayer 1f ne gets a nigh score 
on the fruit machine. For exampie he can win nudges (these allow the reeis to 
move on one notch instead of spirining totally). The player can also play many 
special games such as 'CashDash', ‘Any Money’ and lots more if the right comb- 
ination of symbols is gained. 

Overall the game is a gocdd one, not quite as excellent as Rebound. but then 
that is a tough game to beat. This game. I thought. had more staying power than 
Rebound and, for me. it was more fun to piay but it depends upon your personal 
preference. If you are the gambling type. then tnis is surely the dame for you, 
if not then it is worth buying as it is only £2 on tape. £4 on disc. However if 
you buy both games then together they will cost oniy £3 on tape or £5 on disc. 
This is an incredible bargain and if you only get nalf as much enjoyment out of 
the games as I did. you will be very satisfied. 

To sum up, it's not quite as outstanding as Rebound put is still very qood. 


‘REBOUND and ‘ONE ARM BANDIT SIMULATOR’ botn cost £2 on tape or £4 
on disc but if you buy them together as 4 pair, they cost a mere £3 
on tape and £5 on disc. They can both be obtained from :— 

Alan Scully. 119 Laurel Drive. Greenhills, 

East Kilbride, Glasgow G75 9JG. 


PART 5: Machine 


Cade 


As I have mentioned before, one of the best ways of learning how to program 
in any computer language is to set yourseif a task and then to try and design a 
routine which performs this. 

The brief for this issue is to ‘write a program that prints an introductory 
message, asks a question of the user, gets the answer and then checks to see if 
the answer is correct. If it is, a message of congratulations is printed other-— 
wise the right answer is displayed. To make this more complicated, the question 
will require a word as the answer rather than a number. 


The best method of writing programs is known as STRUCTURED PROGRAMMING and 
this involves logical and easy to foilow steps. They are often made up of small 
modules which can be tested and used in isolation from the rest of the progran. 
The program that we have to write contains several major parts as shown below:—- 

1. PRINT the question 

2. INPUT the answer 

3. CHECK the answer 

4. PRINT the outcome 
You will notice that parts 1 and 4 both invoive printing and so we can use the 
same routine for them. As we have already written a subroutine that we can use 
for this purpose, we don't need to write another one. For those of you who are 
new to Print—-Out it is listed here but we looked at it in more detail in Issue 
One on page 33. 


ORG &400@ ; locate the program at address &4000 
LD HL. string ; load HL with the address of the text 
CALL print ; call the subroutine called '.print' 
RET : return to BASIC 

-print LD A, (HL) ; A = the contents of the address (HL) 
CP @ ; see if A holds zero (FLAGS = A-@) 
RET Z ; return if the A holds zero (ie ZERO=1) 
CALL &BBSA ; print the character in A 
INC HL >: HLSHL+1 
JP PRINT ; Jump to the label print 

string DB "Printing'.@ :; the text to print 


However, we need to print different pieces of text and to do this, all we need 
to do is to load HL with the address at which the text is stored and then call 
the subroutine ‘.print’. 


Next, we must write a module which will allow us to input a word, number or 
sentence. However, not only must we input a word and print it to the screen but 
we must also store it in memory so that it can be used again later in the check- 
ing routine. Such a module will be much more complex than anything we've looked 
at before and so it may be helpful to jot down a checklist of all the things we 
need to include :- 

. We need to actually get the letter from the user. 
The routine must detect when inputting has been ended. 
The DELETE key also needs to be detected. 
We need to let the user see what has been entered. 
There must also be a maximum length imposed on the word. 
6. The end of the store needs to be identified. 
We have now got to work out how we are actually going to achieve these things & 
to do this we will take each point in turn and try and come up with a solution. 


ob wn e- 


The first thing that we need to do is to get the letter that the user pressed & 
to do this we will use the firmware call, KM_WAIT_CHAR (&BB@6). which we looked 
at in Issue Three. Basically, KM_WAIT_CHAR waits until the user presses a key & 
then stores the ASCII code of the character that was pressed in the A register. 
For example if the 'L' key was pressed then the A register would hold the value 
of 76 (or &4C). 

In order to terminate inputting, all we do is to compare the ASCII value in the 
A register with 13 (the code for ENTER) and if it has been pressed, jump to the 
next part of the program. 


Next, we need to check and see if the DELETE key has been pressed. The way that 
we will do this is to see whether the A register holds the number 127 (which is 
the ASCII code for DELETE) after we have called KM WAIT CHAR. If it does. we'll 
need the program to jump to a special routine to handle erasing a letter. This 
routine has to do two things — it must remove the character from the screen and 
also erase the letter from the store in memory. We must also be careful not to 
allow the computer to accidentally erase any of the memory that is not part of 
the store. This will effectively clear some of the program and this might cause 
a crash. In order to overcome this, a counter is needed to record the number of 
characters that have been entered. 

If neither ENTER nor DELETE have been pressed we must let the user see that the 
letter they entered has been accepted and also remind them what they have typed 
so far. To do this we'll use the firmware call TXT_OUTPUT (&BB5A) which we have 
used in every issue so far and prints the character that is contained in the A 
register (by means of its ASCII code). 

To make sure that a word that would overwrite something vital in memory is not 
inputted, we will impose a maximum length on the word that can be entered & use 
a counter to make sure that this limit is not exceeded. 

Finally, we need to tell the computer where the stored word ends in its memory 
so that the checking routine can work properly. To do this we'll adda byte of 
value @ to the end of the word. 
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Printed here is a short program that will do what we require and it is made 
of two subroutines which call each other. The main subroutine, labelled .input, 
does the actual inputting and when it encounters the [DELETE] key it then calls 
the subroutine, .erase. When inputting is finished, the computer returns to the 
main program. For this to work, HL must hold the address of the place where the 
inputted statement is to be stored and B, which is the counter, needs to hold @ 
before .input is called. When inputting has finished, the instruction LD (HL),@ 
adds a byte of @ onto the end of the store to indicate the place where it ends. 


ORG &4000 ; program located at &400@ 
LD HL,store : HL holds the address of the label ‘.store' 
LD B,@ ; B equals @ 
CALL input : goto the subroutine ‘'.input' 
LD (HL) ,.@ ; the contents of the address in HL equal @ 
RET ; return to BASIC 
-input CALL &BB@6 : get a character, store its ASCII code inA 
CP 13 ; see if A equais 13 (FLAGS = result of A-13) 
RET Z ; return if the zero flag is set (ie. A equals 13) 
CP 127 ; see if A equals 127 (FLAGS = result of A-127) 
JP Z,erase ; Jump to .erase if zero is set (ie. A equais 127) 
CALL &BB5A ; print a character according the value in A 
LD (HL),A ; the contents of the address in HL equal value of A 
INC HL > HL=HL+1 
INC B ; BEBtl 
LD A,B ; A=B (A now holds the number of letters entered) 
CP 15 ; see if A equals 15 (FLAGS = result of A-15) 
RET Z ; return if zero flag is set (ie. A equals 15 which 
; means that 15 characters have been entered) 
-dummy JP input : Jump to the label ‘| .input’ 
-erase LDA,B ; A=B (A now holds the number of letters entered) 
CP @ ; see if A equals @ (FLAGS = result of A-@) 
JP Z,dummy ; Jump to ‘.dummy' if zero flag is set (ie. A equals 
; @ which means that no characters have been entered) 
DEC B ; B=B-i 
DEC HL : HL=HL-1 
LD (HL) .@ ; the contents of the address pointed to by HL equal @ 
LD A,8 ; A=8 (ASCII code for backspace) 
CALL &BB5A ; a backspace is printed to move cursor back one 
LD A,32 ; A=32Z (ASCII code for space) 
CALL &BB5A : a SPACE iS printed to erase previous character 
LD A,8 ; A=8 (ASCII code for backspace) 
CALL &BBSA ; @ backspace is printed to move cursor back one 
JP dummy ; Jump to the label ‘'.dummy' 
.store ; label to show where the inputted word is stored 
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The main body of the program sets up the register values that are required 
for the program to work and then the input subroutine is called. First of all, 
a character is inputted using CALL &BB@6 and the next instruction tests to see 
if it is character 13 (RETURN). You might remember, from last issue, that what 
actually happens is that 13 is subtracted from the A register & then the flags 
are set accordingly although the actual result of the calculation isn't stored 
anywhere; this is what the strange comment ‘FLAGS = result of A-13' represents. 
However, if the character that was inputted did equal 13, the ZERO FLAG would 
be set and the instruction RET Z would return to the main program. If the value 
of A was not 13, then the ZERO FLAG would not be set and the computer would not 
RETURN. 


The DELETE key has a value of 127 and the next Z lines check to see whether 
it has been pressed. If it has the program jumps to the routine labelled .erase 
but otherwise it carries on as normal. The character is then printed using CALL 
&BBSA, the address pointed to by HL has the value of A placed in it and HL (the 
address) is increased by one as is B (the counter) which tells us the number of 
letters that have been entered. Then the program checks to see if B is equal to 
15 (ie. 15 characters have been entered) and if so, it terminates the inputting 
routine otherwise this process is repeated. The .store label indicates where an 
inputted word should be placed in memory (ie. after the program). 

Hl ING 
A Jit 

Upen entering the routine, HL holds the address where the next character is 
to be stored and B holds the number of characters that have been entered so far. 
Therefore the first thing that the routine has to do is to make sure that it is 
not deleting something that isn't part of the stored word. The way it does this 
is to see if B equals zero. If it does this means that no letters are present & 
so nothing can be deleted. It then jumps to .dummy & bypasses the print routine. 
However, if B does not equal zero it means that there is something which can be 
deleted and so it allows the delete routine to continue. 

Unfortunately, B cannot be tested using the CP instruction and so the value 
of B must first be put into A. If there is a character to erase it decreases HL 
so that it points at the offending character & decreases B (ie the counter says 
that there is one less letter stored). It removes the letter from the store and 
then erases it from the screen by printing spaces and backspaces. It then jumps 
to .dummy in order to avoid the printing routine. 


THIS ARTICLE IS CONTINUED ON PAGE 37. THE SECOND SECTION DETAILS HOW TO 
COMPARE TWO WORDS AND ACT ON THE DECISIONS. IT ALSO INCLUDES A COMPLETE 
LISTING OF THE PROGRAM ON HOW THE TWO PARTS FIT TOGETHER CORRECTLY. 


From the number of letters that we receive, the one item of hardware which 
causes most difficulties and problems is the printer. Therefore, we decided to 
write this article which will hopefully help to answer some of the more common 


problems and queries. 


First of all, I'll deal with the question that crops up over and over again 
— What printer should I buy? This is also the hardest query to give a reply to, 
for the decision depends on what the individual wants to do, and how much money 
they have available. If money is no cbject then the simple answer every time is 
‘a Laserprinter' as it will give the cleanest and sharpest text and graphics of 
any printer. However, the price starts at about £1500 and rises steadily until 
it reaches between three and four thousand pounds. Most people do not have that 
kind of money to spend on a printer (especially one for a humble CPC which just 
has not got the power to drive a Laserprinter to the best of its capabilities — 
for that you really need a Macintosh with very complex programs and a couple of 
30 megabyte hard discs!!!) The majority of potential printer owners are looking 
at spending between £150 and £700 at most so we will look at the printers which 
fall in this range. 

There are three main types cf printer and I'1li make some generalised points 
about them first. 

DOT MATRIX PRINTERS — These produce the ietters/graphics by firing a series 
of pins in the correct pattern so as to form the desired character. Consequent— 
ly the letters are fairly dotty if looked at closely. Because the image is made 
by punching dots onto the paper. graphics can be produced easily providing the 
correct screen dump is used & many have appeared in the national magazines over 
the years. There are now two types of dot matrix printer; the 9 pin and the 24 
pin. At present, the 9 pin version is more common although many 24 pin printers 
are becoming popular. As you might expect the second type has 24 pins which can 
be ‘'fired' at the paper and. as they have more dots, the characters become more 
solid and less dotty. The drawback with these, is that the pins are arranged in 
a different shape (3 x 8 pins) from 9 pin printers (1 x 9 pins). Therefore, all 
the commercial graphic screen dumps for the CPC, which were originally written 
for just 9 pin printers, whilst working with the 24 pin variants produce rather 
‘blotchy' graphics — if screen shots, etc. are important to you and you are not 
able to write machine code screen dumps, I would think carefully about buying a 
24 pin printer. 

DAISY WHEEL PRINTERS, on the other hand, work in much the same manner as an 
electric typewriter (ie they have a disc which rotates until the correct letter 
is selected and then a hammer punches it onto the ribbon which in turn imprints 
it on the paper). This gives a very much improved type quality but it is slower 
and noisier than a dot matrix printer & is unable to print graphics. The other 
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disadvantage of daisywheel printers is that in order to print in different type 
styles, you need to buy new printing wheels (about £10 each) whereas dot matrix 
printers are supplied with with several typefaces built—in and more can easily 
be designed if needed. 

The third type of printer is a LASERPRINTER which generally can print clean, 
shaded graphics and has excellent letter quality. They are also quiet, fast and 
efficient and can have new typestyles added very easily. However, they are not 
popular among home computer owners as most of their options are unavailable on 
the CPC. A fairly recent addition to the range of printers are INK JET PRINTERS. 
They are similar to laserprinters except that instead of using powder on light 
sensitive plates, the letters/pictures are formed by firing fine jets of quick- 
drying ink at the paper. Many of the advantages of a laserprinter are available 
but the price is about half that of a laser printer. As yet I have not heard of 
one being used on a CPC but it might be possible. 

As a summary of the types of printer available, here is a chart showing their 
relative strengths and weaknesses 


= | 


GRAPHCS YES YES 


ADVANTAGES | Text and graphics 
can be done; cheap 
and flexible; they 
have good support 
in many magazines 

PROBLEMS ‘Dotty’ letters & 
graphics on the 9 
pin. 24 pin can't 
print clear grap- 
hics without some 
special program & 
has far improved | standards compatable 
text quality 


PRICE about £150 — £300 £400 — £700 £1500 — £3500 | £700 — £1500 


* Dot matrix have two speeds — one (draft) is very dotty and the other (Near 
Letter Quality) is the less dotty version. The number in the brackets refers 
to its NLQ speed and is given in characters per second (cps). 


DOT MATRIX 
9—PIN 24-PIN 


200cps 240cps 
(SOcps)*  (7Ocps) * 


Has excellent 
text/graphics 
and is fast & 
has many good 
builtin fonts 


Produces very 
qood text and 
is excellent 
for producing 
documents 


text/graphics 
& it is quite 
fast 


Quite expens- 
ive;is unable 
to print gra- 
phics at all. 
Does not con- 
form to Epson 


Extremely ex— 
pensive & has 
got virtually 
no support on 
the CPC;might 
not be at all 


Expensive and 
has virtually 
no support on 
the CPC;might 
not be at all 
compatable 
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My general advice would be to buy a dot matrix printer and if graphics are not 
that important, preferably a 24 pin printer. If you feel that you are likely to 
print graphics of any kind then go for a 9 pin dot matrix printer and if colour 
is needed then the Star LC-10 Colour represents excellent value for money & you 
can judge its near letter quality type as the entire magazine is printed in it. 


Also when considering buying a printer, remember that if you buy it by mail 
order, you are likely to receive a substantial discount. I've found that M.J.C. 
(see their advert in Amstrad Action) offer tremendous service & support and are 
always willing to give help and advice. Their telephone number is (0462) 32897/ 
420847/421415 and their prices are often upto £100 lower than the retail price. 


Error ?!! 


You should try & make sure that your printer is EPSON compatable (most are) 
and as this is the main industry standard you are quaranteed that most programs 
will work with your chosen printer. To connect your printer to your CPC you'll 
also need a CENTRONICS/PARALLEL cable and this leads us onto a common problem — 
the notorious double line feed. 

If you find that the printer leaves a blank line between two lines of text, 
then you need to insulate pin 14 of the interface cable. The way to do this is 
to stick a small piece of tape over pin 14 of the CPC's printer port (pin 14 is 
the fourth in from the left on the top as viewed from behind) before the cable 
is plugged in. 

Another common problem is the appearance of £ signs in place of # signs and 
vice versa. The problem is quite tricky to solve through programming but if you 
buy a good word processor you should be able to overcome this difficulty. 

But perhaps the greatest problem of all is understanding the manual — they 
are the hardest books to learn from! When you have finally bought your printer, 
set it up, plugged it in, typed in the example listing and....the computer will 
probably reply with ‘Syntax Error’. Sometimes the example will use the command 
LPRINT and you will need to replace this with PRINT #8. For example, if it says 
LPRINT "The printer works" you will need to enter PRINT #8,"The printer works”. 
While this is fine for trying out the printer, there will come a time when you 
will want to produce documents/letters in an easier manner and then you need a 
word processor — I would recommend PROTEXT because of its availability on tape, 
disc and ROM. 

When you first start using printers, you'll encounter many further problems 
but most of them can be sorted out through trial and error and careful reading 
of the manual. The great bonus with printers is that, short of taking a solder- 
ing iron to them, you are very unlikely to damage either printer or computer by 
experimentation — any messes you get yourself into can be overcome by switching 
the printer off for a couple of seconds. 


If you have any further problems than please write and we would be only too 
glad to try and sort them out. 
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For tape owners, one of the greatest problems with the CPC is the time that 
it takes to load programs or files of all descriptions. I find with my 464 that 
there are many occassions when I wish to save the BASIC program that I am work— 
ing on, load in another file (eq a program that I wish to check before MERGING) 
and then retrieve my old BASIC program, for example. Another time this happens, 
is when you need to use a utility at some point whilst programming. Of course, 
for disc owners this represents no real problem as disc accessing is so quick & 
simple. However, even then, there may be times when you wish you could make an 
instantaneous save of a program and then reload it just as quickly. This would 
allow you to make a backup copy of the program you are working on before making 
a major alteration, or imagine the uses of having two programs in memory at the 
same time and being able to swap between them easily. With these possibilities 
in mind, I programmed the short Machine Code routine below which stores a BASIC 
program at a safe address in memory for recalling later. The program can handle 
all BASIC programs which are less than 8K in size (it checks automatically and 
informs you if copying is not possible) although with a few minor modifications 
you could easily change the maximum size. Tne one thing it doesn't allow you to 
de is to halt a BASIC program in mid-execution, store it and then restart from 
that position as this would have required much more code to preserve variables, 
positions, etc. 

The actual program sets up two RSXs, ‘STORE and iRECALL. whose code is held 
at &BE8@ — because this area can survive a soft reset (CTRL-SHIFT-ESC) you need 
only to load the program once when you first switch on unless the code is over— 
written by another M/C routine. The program that you wish to preserve is stored 
from &80@@ to &A@@@ and this means that you have only 31K to use for your BASIC 
programs !!! Any stored program will survive a NEW command because of the line, 
MEMORY &7FFF, that prevents BASIC from clearing or overwriting any memory above 
this address. In order to run the program to run on a 664/6128 you will need to 
alter these two lines... 


(F3] 3@ DATA 95,BE,C3,B9,BE,@1,66,AE 
{9B] 8@ DATA C9,21,17,BF,01,66,AE,7E 


...it runs as printed on a 464. To use the RSXs, simply load in the program 
you wish to store, do whatever you want to with it (including running and edit-— 
ing it) and then type iSTORE. If no error message has occured then all is well. 
Now load in another program or change the existing program and when you wish to 
retrieve your old, stored BASIC program type ‘RECALL. You will then be able to 
list, run, edit, etc the program as if it had been there all along. Please note 
that the stored program does NOT itself survive a soft reset but only the code. 
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COF J 
C16] 
CDSJ 


19 DATA 01,8D,BE,21,89,BE,C3,D! 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


BC, 00, 20,00, 20, @C, BF,CS 
95, BE, C3, B9, BE, 01,83, AE 
21,17, BF, 0A, SF,77,03,23 
@A,57,77,62, 6B, 42,48, 11 
00, 20,87,ED, 52,02, D2, BE 
21,6F,01,11,00,80,ED, BO 


Limnechecker 


A PROGRAM TYPING AID 


All programs in Print—Out have 
Linecheck codes which are enc— 


C80] DATA C9,21,17,BF,01,83,AE, 7E losed in brackets at the start 
[A2}] 90 DATA SF, 02,235,035, 7E,57,02,21 of a line. Don't enter them in 
[D8] 100 DATA 00,80,42,4B,11,4F,01,ED as they're designed to be used 


with Linechecker to eliminate 


[C7] 11@ DATA BO,C9,21,£0, BE, 7E,FE, 00 
£34] 12@ DATA C8,CD,5A,BB,23,C3,05, BE 
£13] 130 DATA 54,68,65,20,42,41,55,49 
[9D] 14@ DATA 43,20,70,72,6F ,67,72,61 
{6C] 15@ DATA 6D, 20,69,73,20,74,6F ,6F 
(5B] 16@ DATA 20,62,69,67,20,74,6F , 20 
[C8] 17® DATA 62,65,20,73,74,6F , 72,65 
[25] 180 DATA 64,@D,@A,20,53,54,4F,52 
[BQ] 19@ DATA CS5,52,45,43,41,4C,C0, 8 
C203 200 DATA end 

[D6] 210 add=&BESe@ 

CQF] 22@ READ a$:IF a$="end" THEN GOTO 250 
[53] 230 POKE add, VAL ("&'+aS) :add=addt1 
([@5] 240 GOTO 220 

{@1] 250 MEMORY &/7FFF:CALL &BES®O 

(6C] 26@ PRINT "Both RSXs now installed at &BESO” 
[6B] 270 PRINT " To preserve a program type :STORE” 
{6F] 280 PRINT " and to retrieve it use + RECALL” 
[8E] 29@ PRINT "NB Memory is now reduced to &/7FFF" 


errors when typing in programs 
which appear in this magazine. 
Please note, all programs will 
run whether Linechecker is be- 
ing used or not. For informat- 
ion on how to use Linechecker, 
please see Issue Three. 


The next program allows you to list any ROMs that you might have installed at 

any time (whether initialised or not). The main part of the program is written 
in Machine Code although the printing routine is driven from BASIC. Sometimes, 
when writing programs in either BASIC or Machine Code it is important to know 

which ROMs are available (eq. to check for clashes in commands names or memory 
that has been reserved). However. most commercial ROMs contain a ‘HELP command 
that lists the names of all the available ROMs. The major drawback is that you 
cannot use the information that the command found in your own programs as it's 
not stored anywhere (except on the screen). With the routine below the inform- 
ation that it finds out about the ROMs is stored in memory starting from &&@45 
and continuing until it has stored all the details of upto rifteen ROMs. 

The order of storage is as follows :- 


First byte — ROM type (@=foreground, l=background, 2=extension 
Second byte — ROM mark number 
Third byte — ROM version number 
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Fourth byte -— ROM modification number 

Fifth byte onwards - ROM's name (end is signified by a byte of &FF) 
The only problem with the listing is if the ROM is laid out in an unorthodox 
manner then the name may be corrupted (we have yet to find a ROM that does not 
work successfully and it has been tested with most of Arnor's ROMs and CPM). 


CSB] 10 MODE 2:lin=2 Continuing on this theme of listing 
C78] 20 DATA 11,45,80, 2E,00,CD,@F,B9 any peripherals which your computer 
CEFJ] 30 DATA C5,2E,00,C5,CD,@F,B9,CD has attached, we have printed below 
CE9] 40 DATA 1F,80,01,0C,79,FE,@F,C2 a short routine that detects a disc 
CBA] SQ DATA 0B,80,C1,CD,18,B9,C9,21 drive (if attached and switched on). 
£12] 6@ DATA 00,00, 06,04, 7E,FE,80,C8 i® ON ERROR GOTO 1000 

[D9] 7@ DATA 12,23,13,19,F7,4E,235,46 20 disc=1:iDISC 

[7A] 80 DATA @A,FE,80,F2,30,80,12,03 3@ ’ Rest of the program 

[A2] 9@ DATA 13,C3,30,80,D46,80, 12,13 999 END 

CSC] 100 DATA SE,FF,12,13,C09, 00, 98,00 1900 disc=@:resume 30 


C2D] 110 DATA end After running, disc will equal 1 if 
C8CI 120 adc&&8000 a disc drive was detected. and zero 
{6C3 130 READ a$:IF at="end" THEN 160 if a disc drive was not present. 


(54) 
C07] 
C08] 
C60] 
C09] 
£46] 
CBF J 
C39] 
CD74 
C2F] 
(SAI 
CA4I 
CCBI 
C6F I 
C6E] 
£20] 


[62] 


CFS] 


C7EJ 


CALI 
C40) 


CFO] 


14@ POKE add, VAL ("&''+a$) sadd=add+i 


15@ GOTO 130 
16@ PRINT "The ROMs that are available are :-" 
17@ CALL &8000 


180 add=&8045 

19@ FOR rom=i TO 15 

2@@ type=PEEK (add) :mark=PEEK (add+1) 
210 vers=PEEK (add+2) :m=PEEK (add+3) 
220 add=add+4: names="" 

239 c=PEEK (add) 

249 IF c=&FF THEN GOTO 279 

250 nameS=name$+CHRS (c) 

269 add=add+1:GOTO 230 

270 add=add+i 

280 LOCATE 3,lin: PRINT names 

290 LOCATE 14,lin:PRINT USING "#."; 


300 PRINT USING "#'"svers;:PRINT USI 
310 IF type=0 THEN t$="FOREGROUND": 
320 IF type=i THEN t$="BACKGROUND" 


330 LOCATE 19,lin:PRINT t$3"' ROM" 
340 IF PEEK (add)=@ AND PEEK (add+1)= 


3o@ Lin=lintl:NEXT rom 


CPC ADVENRTARES 


LORDS OF MAGTO - defeat the awsome 
Lords and find a way to return 
home from a land where no-one has 
ever escaped, 4 challenge for only 
the best adventurers... "I was 
quite impressed with the text & 
overall descriptions of the 
various locations..." FRINT-~OU? 
ISSUE A. 


ISLAND OF CHAOS - Explore the 
island of Brael Ti and face the 
evil Baktron,. "I wasn't disappoi- 
nted. The loading screen was good 
as were the imaginative descript- 
dons and puzzles... oeeif you 
especially enjoy adventures TI 
would say that it's good value 
£3.95 on disc."PRINT~OUT ISSUE 


mark 5 


NG HEM si 


GOTO 330 


io eTS Pree clue sheets 
are available for both sames, 
Please ees cheque/postal orders 
payable to: T.KINGSMILL. All 
ganes are DISS ONLY but will run 
on all CECs with a disc drive. 
LORDS OF MAGIC costs £3. ae 
ISLAND OF CHACS costs £ 
TT, KINGSMILL,202 PARK ST 
: OPREST,ST, ALBANS ,H 


ELSE t$="EXTENSION" 


@ AND PEEK (add+2)=@ THEN END 


DANS, 


pint 
as3 
= 

ERTS 
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An intro to RSX.s 


part 1 by BOB TAYLOR 


In common with other more advanced BASICs, Locomotive. the dialect resident 
in our CPCs, has the ability to have extra commands added. The name given to 
these is Resident System Extensions, or RSXs for short. In these few articles I 
hope to show the normal way of using this facility, together with my own rather 
unorthodox approach. 

An RSX is a form of named CALL command: the iatter has only an address to 
identify it while an RSX must have a name which is descriptive of its operation. 
Additionally, it is quite easy to type in a wrong address for a CALL with prob- 
ably disastrous results; an RSX on the other hand will either qo to the correct 
routine associated with the RSX name, or stop with an error message if the name 
has been entered wrongly. Of course both CALLed and RSX routines are present as 
machine code. 


As a starting point, we will look at the following routine which sets up 2 new 
commands for clearing or setting CAPS Lock — intended for use within a program 
to set input to upper or lower case as required: 


ORG &8000 
~intrsx LD BC,comtbl s;address of the command table. 
LD HL_,datblk saddress of the 4 byte data block. 


JP &BCD1 sreturn directly to BASIC after Firmware Call KL LOG EXT 
»datblk DEFS 4 sreserve 4 bytes for data block. 
»comtbl DEFW namtbl saddress of the name table. 
JP capon sto routine to set CAPS LOCK. 
JP capoff sto routine to clear CAPS LOCK. 
-capon LD Ay kFF sany non-zero value will set CAPS LOCK to on. 
JR capcom ;the rest of the routine is common with most of CAPSOFF. 
-capoff LD A,®@ ;zero will reset CAPS LOCK (ie to lower case). 


.-capcom LD HL,&B4E8 3 (&B632 for the 6128): the system variable holding the 
;CAPS LOCK flag. 
LD (HL) A ;store the new flag value. 
RET sto BASIC. 


enamtbl DEFB "CAPSO"", 'N'+&%.8o 
DEFB “CAPSOF", "F°+&8@ 
DEFB &@@ send of Name Table byte. 
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In order to get the computer to recognise our two new commands, we need to 
present them to the Operating System via KL LOG EXT. The routine shown in the 
three lines starting at .intrsx is the shortest possible to achieve this. Note 
that instead of using ‘CALL &BCD1:RET', we have JumPed to kL LOG EXT and so are 
using the RET at the end of that to RETurn from our initialisation routine also. 
This will save us one byte of space and 17 'T' states — reduction of the length 
of routines and their speeding up are always especial aims of my coding. 


When KL LOG EXT is invoked, the Operating System logs on the Command Table. 
It does this by utilising the Data Block pointed to by HL. This is an area of 4 
bytes which has to be in the central 32k of RAM. These bytes will be set up to 
contain the Command Table address together with the address of the next similar 
Data Block in a chain which ties together all separately entered RSXs and ROMs. 
If our RSX is the last in the chain, this address will be replaced with 2 bytes 
of &@@ to signal that it's the last. These four bytes must not then be used for 
anything else. However, before the log-on, they don't have to be empty & unlike 
above, I often use part of the initialisation routine which becomes redundant 
once used, so saving four bytes of memory. 


The Command Table (at .comtbl) which must also be in the central 32K of RAM, 
consists of two bytes which contain the address of the list of Command Names we 
are using for our RSXs. These two bytes are then usually followed by a series 
of JP (Jump) instructions to the routines which perform the RSxs (note that the 
sequence must be the same as the names in the Command Name table): 


.comtbl DEFW address of Command Name Table 
JP address of routine for RSX with FIRST name in Command Name Table 
JP address of routine for RSX with SECOND name in Command Name Table 
(JP address of routine for RSX with THIRD name in Command Name Table) 
etc. 


I said usually, because we don't have to lay out each RSX's entry in the table 
in this way. If there is only one RSX being initialised, we can start the rout— 
ine for the RSX immediately after the Command Name Table address and so save 3 
bytes of memory. With just a few RKSXs, we might be able to use JR instructions 
instead of JPs providing the routines are within 127 bytes of the entry. There 
is a necessity to maintain an area of 3 bytes for each entry (except for the 
last), so using JRs will not save any memory; by not using a JP instruction we 
eliminate, however, an absolute address which might normally need to be altered 
when re-locating (more of which in a later article). Another use for the three 
bytes of an entry is possible when Z RS5xs, using the same fundamental routine. 
occur together. The first entry space could be utilised to set a flag, to load 
a register with a value or to CALL another routine. any of which will apply to 
the first RSX only; the second entry must then JR or JP to or start the common 
routine. The routine above shows the ‘proper’ way of using the Command table -— 
however part of the routine could be re-written as: 
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.comtbl DEFW namtbl saddress of the name table. 
»capon LD A, &FF sany non-zero value will set CAPS LOCK to on. 
DEFB &@6 ;dummy instruction: when entered via .capon, this will 

;be seen and treated as LD B,&AF so using the next byte 
3 (XOR A = &AF) also. In this way, register A holding 
s83FF will not be re-loaded with @; the next instruction 
3to be obeyed is LD (&B4E6),A. There is also a saving 
sof 5S ’T’ states compared to the JR used previously. 


-capoff XOR A szero will reset CAPS LOCK (ie to lower case): XOR A is 
sone byte (and 3 ’T’ states) less than the LD A,% used 
3 before. 


LD (&B4E8) ,A 3 (&B632 for the 6128); another byte (and 4 ’T’ states) 
;saved by loading the flag directly instead of via 
7 (HL). 

RET etc 


The entries in the Command table at .capon and .capoff now form part of the 
routines, so saving a further six bytes by eliminating two JPs. Note that three 
bytes are still allocated for the .capon entry in the command table - as there 
are no further RSXs after CAPOFF, the allocation of three bytes for this RSX is 
irrelevant. 


All this alternative use of entry bytes may create one minor probiem for anyone 
with a |HELP RSX which lists all RSXs and their routine addresses; these iHELPs 
work by picking the second ard third bytes of each entry in the Command Table & 
printing this as an address. If we have used these bytes in a different manner. 
the address so printed will be meaningless. 


The Command Name table consists of the list of the names we have chosen for 
our new RSX Commands (the | character which precedes the RSX command in BASIC 
does not form part of the actual name and should not be present in this table). 
Each name needs to start with a letter and may contain letters or digits or the 
full stop character only with a maximum of sixteen characters. Ali letters must 
be in upper case and the last character of each name has to have bit 7 set (ie. 
must have 128 or &8@ added). Each name follows immediately after the end of the 
previous one & the last name must be followed by a byte of &@@ to indicate that 
it is the end of the list. 


Once the RSX has been initialised. it should not be re-initialised - doing 
so would alter the data in the Data Block and result in a crash!!! The easiest 
method to avoid this is to insert a byte of &C9 (machine code RET instruction) 
as the first byte of the initialisation routine after this has been used once. 


Groups of RSXs can be initialised at any time: each such group will set up its 
own block of data which chains into those already there. 
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A decision has to be made as to whether it is OK to just exit the RSX with- 
out doing anything should an error occur (eq the number of parameters is wrong, 
as in the 'CAPS RSX at the end of the this articie) or whether an error message 
needs to be printed & the BASIC program stopped to draw attention to the fault. 


The first option allows a simple RETurn from the routine (assuming nothing has 
been PUSHed onto the stack) while the second can be facilitated using routines 
in ROM. If the second way is chosen, we can use BASIC's error handling routine 
which can report any of the usual BASIC error messages, or if none of these is 
Suitable, we could print our own before using the same exit path. 

This exit method is useful in that it does not require that anything PUSHed on 
the stack must first be POPped, and this also gives an ERR number which can be 
‘trapped’ if needed. We can even arrange that our error has its own unique ERR 
number. In the routine below is a suggested errer routine starting at .parerr. 


Next time we shall look at RSXs which need data fed to them to work and in 
turn are able to output data also. To end with, here is another version of the 
CAPSON and CAPSOFF routine which incorporates most of the points given so far 
and including a couple which will be explained next time. It has been reduced 
to the single RSX, 'iCAPS' which requires the flaq value to be input directly 
with it using the syntax: 

iCAPS ,<Flag value (@ for lower case; non-zero for upper case) > 


ORG &8000 
~intrsx NOP sthis byte will be filled with the RET instruction 
;byte to stop re-use of this initialisation routine. 
-datblik LD HL ,&8000 ;the address of the NOP byte. Also, the 4 byte data 
block used by KL LOG EXT starts at the first byte 
3of this instruction. 
LD (HL), &CP sstore a RET byte. 


INC HL ;HL now points to .datbik for KL LOG EXT. 

LD BC,comtbi ;address of the command tabie. 

JP &BCD1 sreturn directly to BASIC after Firmware Call KL LOG EXT 
«comtbl DEFW namtbl saddress of the name table. 
-caps DEC 4A snow zero if Flag value parameter only is present. 


JR NZ,parerr ;if no parameter or too many, then report error. 

LD A,(IX+@) 3get the Flag value. 

LD (&B4E8) ,A 3 (&B632 for the 6128) Get the system variable with the 
;Vvalue input. 


(continued on next page) 
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(continued from previous page) 


enamtbl DEFM "CAP", 'S'+&8o 
DEFB &@@ 3end of Name Table byte. 


»parerr LD HL,errmes ;HL -> error message *Check Parameters’. 


CALL prtstr sprint the error message. 

LD A, SS :ERR number; anything above 32 is an ’Unknown Error’. 

LD C,® 3for ROM © (BASIC). 

LD HL,&CA9S ;(&CBSS for 6128); BASIC’s errar handling routine in ROM 
JP &@01B 3to FAR CALL to ROM; the error handling routine alters 


sthe stack so doesn’t REturn. 


eprtstr A, (HL) 3get first/next char. of string to print. 
OR A 
RET Z sif string finished. 
CALL &BBSA sprint char. 
ING HL ;step on to next char. 
JR prtstr 3for next character. 


-errmes DEFB "Check Parameters" .&@@ 


In the meantime here is a brier explanation of 'T' states. The rate at which 
the microprocessor carries out any Machine Code instruction is measured in 'T' 
states. The number varies from instruction to instruction: eg XOR A requires 4 
and LD A,@ needs 7, showing that XOR A is faster than LD A,@ by 3 'T' states. 


A 'T’ state is actually a clock pulse. So that if the computer's clock driving 
the microprocessor runs faster (upto a maximum specified for the microprocessor 
chip), the instructions are processed faster. However, while a 'T' state is a 
clock pulse, the reverse is not necessarily the case. This is because of things 
called 'Wait' states. These are clock pulses that the microprocessor is told to 
ignore - eg. when accessing slower memory or when Direct Memory Access (DMA) is 
required by an external system. Any such Wait states are additional to the spe— 
cified number of 'T' states an instruction may require: for example there might 
be 5 clock pulses occurring during the processing of the XORA -— 4 'T' states 
plus 1 Wait state. The actual number of pulses that are required for the XOR A 
will still be at least 3 less than those required for LD A,@. 

In the CPCs, although the system clock operates at 4Mhz (that's 4 million clock 
pulses per second), there are restraints on memory which reduce the number of 
usable pulses to about 3 million per second by interspersing ‘Wait' state clock 
pulses. 
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In our last issue, there was an article about 
CPD — one of the few tape based Public Domain 
libraries for the CPC. It has now expanded to 
include disc based PD software and to explain 
the changes we asked Alan Scully, the master— 
mind behind it, to write a follow-up article. 


SCUbL bb 
IS bORN 


After my article in the last issue of Print-Out, I have expanded my PD library 
enormously, and have achieved success in getting mentions in the major Amstrad 
magazines. The PD library also now supplies PD on Disk as well as Cassette and 
because of this the library is now called Scull PD (it would be a bit silly to 
call it Cassette Public Domain now that I do disks!!). There are a lot of good 
programs in my PD library, you may go Wild over DW EasyDos DeskTop, go crackers 
over the Playable Demo of TOTAL ECLIPSE (thanks to Incentive Software), or you 
may even be impressed by Woboll - Thomas Defoe, editor of this superb magazine. 
was. Of course, with over 300 programs on disk & 250 on cassette, there's sure 
to be something of interest in the library: 

You might remember in issue 4 of the mag, Tony Kingsmill was selling adventure 
games, and they got quite good reviews. Tony recently sent me a copy of ESCAPE 
FROM THE ALIEN SPACESHIP, another one of his adventures (about a third the size 
of his adventures for sale) & has given me permission to use it in my library. 
the program can be found on FD CASSETTE 15, which also contains 5 other games. 
or on PD DISK 8 which contains lots more programs including the Total Eclipse 
playable demo. 

Anyone who buys Amstrad Action will notice that David Wild's FD programs have 
been given a lot of coverage. Unfortunately, these programs were available on 
disk only, but now Scull PD can bring them to you on cassette (well, most of 
them). PD CASSETTE 10 contains nine of his best programs (inc BASIC+, Hackers 
Basic, and Pilot CPC), and some of his other programs are ‘dotted’ about the 
library, for example, MiniCAD is available on PD CASSETTE 16. 

From some of the letters recieved, assemblers seem to be in demand. There are 
two assemblers in the library; AA Micro Amstrad Assembler+ & Power Assembler. 
Both these programs support many commands and are very easy to use. PD DISK 7, 
contains both assemblers, PD CASSETTE 16 contains Micro Amstrad Assembler+. & 
PD CASSEITE 11 contains Power Assembler. 

Almost everybody has bought a computer game, and almost everybody has games 
that they feel that they need a little ‘help’ with. usually in the form of a 
poke. PD CASSEITE 13, contains loads of pokes to help you on your way, all of 
which are written by Hack Master Andrew Price. If there's a qame you need help 
with then order Hack Attack now — it may just have the poke your looking for. 
If anybody out there has written any programs, or has programs from other PD 
libraries (WACCI CP/M only, and Robot PD selections AMS10 onwards and CPC13 
onwards), then PLEASE send them to me and I will send you some PD in exchange 
(ie I will not charge for it). I plan to get as much PD as possible, so please 
send any PD you have (no magazine listings). 
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That's about it for this issue. all that's left to do is fill you in ona few 
of the library details and to show you the latest pack list...... so here goes! 
* For any TWO selections from the PD CASSETTE range send a C15 cassette, 50p, 

and a Stamped addressed envelope. 

* For any TWO selections from the PD DISK range send a disk, £1, and a Stamped 
addressed envelope. 

* To get your PD free. send some PD with your order & I will return your money 
if I use it. 

* All orders are dispatched the same day (where possible). 

* Stock List regularly updated. send SAE for complete list. 

* Scull PD Library -— The quickest, the cheapest, the best. the largest non-CP/M 
range (CP/M PD soon), You'd be off your Scull to go anywhere else! 

* Scull PD Library can be contacted at (if phoning, ask for Alan) :- 
119 Laurel Drive, Greenhills, East Kilbride, Glasgow G75 9JG. (03552) 24795 


PD CASSETTE 1 - GAMES 1 PD CASSETTE 8 - STARTER PACK PD CASSETTE 15 - (BIG) GAMES 6 

PD CASSETTE 2 - GAMES 2 PD CASSETTE 9 - GAMES 4 PD CADSETTE 16 - APPLICATIONS 3 

PD) CASSETTE 3 ~ (BIG) GAHES 3 PD CAOGETTE 10 - PROGRAMKING PD CASSETTE 17 - SERIOUS 2 

PD CASSETTE 4 ~ SUBROUTINES/ ROUTINES PD CASSETTE 11 - APPLICATIONS 2 PD CASSETTE 18 - SERIOUS 3 

PD CASSETTE 5 ~ AL/EDUCATIONAL PD CASOETTE 12 - GAMES PD CASSETTE 19 ~ (BiG) GAMES 7 

PD CASSETTE 6 - APPLICATIONS 1 PD CASSETTE 13 - HACK ATTACK i PD CASSETTE 20 - SERIOUS 4 

PD CASGETTE 7 - SERIOUS 1 FD CASSETTE 14 - GRAFIX PO CADSETTE 21 - TOTAL ECLIPSE DEHO 
PD DISK 1 - SERIOUS 1 PD DISK 9 - DR DISK 1 FD) DISK 9 - SERIOUS 2 

PD DISK 2 - GAMES 1 PD DISK 6 - DW BISK 2 PD DISK 10 - SAHES 4 

PD DISK 3 ~ GAMES 2 PD DISK 7 - APPLICATIONS PD DISK 11 - ARTIFICIAL INTELLIGENCE 
PD DISK 4 - ANIMATION DEMOS (6128) PD DISK & - SAKES J /EDUCATIONAL/ GRAPHICS 


What PRINT—OUT thought 


Despite the lack of paper documentation with these cassettes/discs the programs 
themselves give you enough information, in most cases, to successfully operate 
the routines and in some cases you are even told how the program works. Prices 
are reasonable enough — especially for the tapes — and the service is usually 
quick and reliable. Some of the programs are of really high quality and would 
not shame a homebrew collection and most programs, although often quite short, 
perform a useful task (some more obscure and less valuable than others). There 
seems to be, in general, a large selection of programs in the library and they 
are all quite varied. One of the drawbacks with any PD library is that you are 
never quite sure of what you are going to get. However, with Scull PD you are 
likely to find something that is suitable and useful but some of the routines 
come from magazines or other PD libraries and so, in a few cases, you may find 
yourself duplicating what you have already received from other sources. Each 
tape holds, on average, about 13 programs and each disc has about 20 programs 
(although these figures do vary considerably). Use of the discs is much easier 
than tapes as all the programs can be easily located. Each disc also comes with 
‘DiskTop', a very useful program which allows you to RUN, LOAD, RENAME & ERASE 
programs as well as a few other options such as catting discs. 
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Advanced BASIC 
Curtomising lput Routines 


It is often said that in crder for a commercial program to be a success, it 
needs to be as user-friendly and helpful as possible. As the time when the user 
needs to interact most with the computer is when information is being inputted, 
it would seem sensible to make this part of the program as simple and easy-to-— 
use as possible. In this issue's Advanced BASIC section, we'll be concentrating 
on using the CPC's inputting commands to the best of their ability. 

Almost every BASIC programmer knows about the INPUT command, but for those 
of you who don't, type this in :- 


INPUT mumber 


Helpful, isn't it? All it does is print a question mark and then wait for some-— 
thing to be entered. As the variable following it, number, is numeric it wants 

a number to be inputted. However, if we did not know that it required a number 

and entered a letter instead, the computer would respond with ?Redo from start 

— not very useful. In order to tell the user what the computer needs, we could 

print some text as well. Try this :- 


INPUT "Enter a number : ",number 


This is more friendly but still throws out an error message if a letter is 
entered by mistake. One way round this, is to change the numeric variable to a 
string variable by entering :- 


INPUT “Enter a number : ". numbers 


This will now except both letters and numbers, not very useful if ONLY numbers 
are meant to be allowed. To solve this problem all we've qot to do is to break 
down the string into one character long strings and then see if any of them are 
letters. If so, the entry is disregarded and the program repeated. The follow-— 
ing program will do this :- 


1@ INPUT "Please enter a number : ",numbers 
20 word=0: b=LEN (numbers) 

30 FOR i=1 TO b 

40 c$=MIDS (number$,i,1) 

3@ valid$="1234567890" 

6&@ check=INSTR (valid, c#) 

7® IF check=@0 THEN word=1 

80 NEXT i 

90 IF word=i THEN GOTO 10 
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Lines 3@-8@ split the entry up into strings just i character long (Line 4@) 
& then check to see if the character is allowed (Line 6@) and if it is not, the 
flag ‘word' is made equal to 1 to indicate that a letter is present (Line 7@). 
The characters which are allowed are stored in valid$ (Line 5@). 
Although this works it can present a slightly untidy screen display (especially 
if a very long word was entered) and to overcome this the following alterations 
need to be made :— 


i MODE 2 
19 LOCATE 1,1:PRINT "Please enter a number : "' 
11 LOCATE 25,1: INPUT "". numbers 
90 IF word=1 THEN LOCATE 25,1:FOR i=1 TO b:PRINT " "“s:NEXT i:GOTO 11 


These modifications are fairly self explanatory. Line i is needed in order 
to tidy things up & line 1@ simply prints the text at the required position on 
the screen — it doesn't input anything because the text printing and inputting 
commands need to be on separate lines. Line 11 does the inputting — the LOCATE 
command positions the cursor at the end of the text and the '', is required so 
that a question mark is not printed. Line 9@ then erases whatever was inputted 
incorrectly and then goes back to line il. 

However, there is still one major problem: this program does not input a number 
but inputs a string which contains a number. The trouble with this is that you 

may not use it as a numeric variable or in any calculations. To illustrate this 
add the following two lines :- 


19@ PRINT "The number is : “fnumbers 
11@ PRINT "The number when multiplied by three is : ':number$k3 


When the computer attempts to execute line 118 it gives up and prints ‘Type 
mismatch in 11@'. All is not lost though. The addition of these three lines.... 


93 num=VAL (number $) 
1@@ PRINT "The number is :"'3num 
11@ PRINT ‘The number when multiplied by three is :"snumxkS 


....sorts the problem out. Line 95 converts a string to a numerical value which 
can be used in an identical way to any other numerical variable. 

That's one method of inputting things, what about all the others? There are 
several other ways of getting information from the user by use of INPUT (eq the 
above routine could be modified so only words would be accepted) & also its com 
panion, LINE INPUT. LINE INPUT behaves in an identical way as INPUT but accepts 
exactly what is typed (including commas) The other inputting command frequently 
used is INKEY$ and this was mentioned in Issue Three. With some programs it is 
necessary to allow a certain number of characters to be entered and the program 
below lets you enter a word and automaticaily stops when ten ietters have been 
entered and it ignores the ENTER key :— 
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1@ MODE 2 

20 PRINT "Please enter a name of exactly ten letters : vat 
30 aS=INKEYS:IF ag="" THEN 30 

35 IF ag=CHR$(13) THEN 30 

4@ IF a$<>CHRS(127) THEN GOTO 100 

D@ b=LEN(mame$):IF <1 THEN 120 

690 c$=LEFTS$ (names, b~1) 

7@ name$=c$:PRINT CHRS (8); 

8@ PRINT " "3CHRS(G); 

9@ GOTO 120 

100 name$=names+as 

110 PRINT ag; 

120 IF LEN(name$)=1@ THEN PRINT: PRINT UPPERS (names) :END 
13@ GOTO 30 


I will leave you to try and work out how it operates. The only clue is that 
the code for ENTER is 13 and that for DELETE is 127. It's important that, under 
certain conditions, various parts of the program are not executed and hence the 
large number of GOTO commands which all bypass sections of the lisiting. At the 
end, the name is stored in a variable called ‘name$'. The program needs to rec-— 
ognise the DELETE key and act differentiy when it is pressed. The deleting part 
of the program is in lines 4@ to 9@ and the instruction PRINT CHR$(S&) moves tne 
cursor back one space on the screen. Even though it does not accept [ENTER], it 
still needs to recognise it so that the printing routine is bypassed, otherwise 
strange symbols might appear. 

The program below is a modified version of that above. It will allow a max- 
imum of ten letters to be entered but the entry can be stopped at any time, by 
pressing the ENTER key. Even when ten letters have been entered, it stili lets 
you delete letters (so changing your entry) and this is terminated only by the 
use of the ENTER key. I hope that these comments have been useful and will have 
enabled you to make your own programs more professional and easy to use. 


1@ MODE 2 

20 PRINT "Please enter a name of no more than ten letters : ue 
SQ a$=INKEYS: IF ag="" THEN 30 

4@ IF aS=CHRS(13) THEN PRINT:PRINT UPPERS (names) :END 
O@ IF a$<>CHR$(127) THEN GOTO 105 

6@ b=LEN(name$):IF b<1 THEN 130 

70 CB=LEFTS (names, b-1) 

80 nameS=c$:PRINT CHRS (8): 

9@ PRINT " "3CHRS(8) 5 

1@@ GOTO 130 

105 IF LEN(name$)=10 THEN GOTO 30 

110 name¢t=namet+a$ 

120 PRINT as; 

13@ GOTO 30 
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COLCURDUMP 2 


Colour printing with an Amstrad Q 

If you mentioned that your computer was able to print colour graphics using 
a standard printer at very little extra cost, the chances are that people would 
think that you were either mad or had invented a new programming technique. But 
neither is strictly true. It's possible to print full colour screen shots & any 
other graphics that you choose for only £12.95 plus an Epson compatible printer. 

Before I get into the review proper. I will make a few generai points about 
Colourdump 2 and the printers that can be used with it. Colourdump 2 is written 
exclusively for MJC and can be bought only through them and costs £12.95 and is 
available only on disc. Although the advert for it says that it works only ona 
CPC 6128, I have found that it operates perfectly on a CPC 464 + Disc Drive. It 
will work on any printer that is Epson compatible. and this includes almost all 
9 pin dot matrix printers including Amstrad DMP2160. DMP3006. DMP316@, DMP3250. 
Star LC-1@ (mono and colour). Citizen 12@-D and Panasonic KXP1@8@/KXP1@81. With 
a Star LC~18 colour it produces its best results as all four colour ribbons can 
be contained in one ribbon cartridge. With normal black and white printers. you 
need to buy four coloured ribbons (or colour carbon paper) —- black. blue, red & 
yellow. 24 pin printers can also be used but with these. the print quality will 
be worse than with a normal 9 pin printer. Enough of the technical comments and 
on with the review. 

As well as the disc, you receive a professionally presented manual which is 
set out in a very clear and easy—-to-understand manner. This contains any intro- 
duction to the program which sets the background to the program & this is foll- 
owed by a section which describes the various machines that can be used & also 
tells you what type of screens you can print. The program can print out OCP Art 
Studio and AMX Art pictures alomy with the normal screens that you create using 


Although we are unable to reproduce the colour of the print~out. below is a 
screen shot printed by Colourdump Z. This is the actual size of the picture and 
shows the quality of printing using the program and a Star LC-1@ Colour. 


BASIC or Machine Code. The main limitation of the program becomes apparent here, 
it is unable to print out screens saved by Multiface devices. However, this is 
not strictly true as it is possible to convert a Multiface screen into a normal 
screen using a utility in a recent issue of Amstrad Action. Providing that the 
screen has not changed size, you can print this out in the normal manner. The 
second problem with the program is that you have to know what the colours are — 
a major difficulty if you have a green screen, although it can be overcome with 
a bit of patience. 

The program is very clearly set out and takes you through printing a screen 
step-by-step and a test screen 1s included on the disc for you to print out. It 
is the manual which is the program's strong point. For without it, this program 
could have become impossible to use but, as it is, it's extremely easy to start 
printing pictures. The program includes many advanced functions such as setting 
the shadings but these are invisible until you want them to. 

Overall, it is a very well thought out program and makes a worthwhile addi- 
tion to anyone's utilities library. Highly recommended for anyone who has a dot 
matrix printer — an absolute bargain at the price. 


Honebrew /dea 


I have an idea for a new column in Print-—Out. As 


you review homebrew sottware as well as programming \ | 
I feel that a Help and Tips page for homebrew soft— Letters 


ware would be a good idea. The column could include 

tips for serious & educational software, as well as 

help with games (maps,pokes,passwords.etc.). If you 

consider this, I'm sure that many readers would make contributions, as well as 
the writers of the software. I feel this is valuable for many homebrew compan- 
ies, being as larger CPC magazines don't really cover this field of software. 


TONY KINGMSILL. ST ALBANS 


P-O: We're always willing to consider any new ideas so if you have any suggest— 
lions for the magazine, write in and let us know. As for the idea above. we need 
our readers to tell us what they think before we start a new section. It's very 
true, however, that homebrew software is given very little coverage in naticnal 
magazines and we are keen to encourage all autnors as much as possible. 


How abou.......? 


And now two quick questions — 'Have you thought of producing a cover cassette? ' 
from ALAN SCULLY, GLASGOW and ‘How are people supposed to know about your next 

issues of Print-OUT?' from CHRIS RUSSEL, HARROW. The answers to these questions 
are, ‘Yes we have, but it would mean doubling the cost of the magazine & so it 

probably will not happen' & ‘We advertise each issue of Print-Out in the Small 

Ads section of Amstrad Action approxiamately once every two months’. 
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This article was written by Richard Sergeant and is hopefully the first part in 
a larger series which will continue into future issues. Many people neglect the 
CPM disc &, as the CPC is quite remarkable in the fact that it can operate CFM, 
we printed this article in an attempt to let users get the most from their CPC. 


The reason I am writing this little article, r) ° 
which may continue into some form of a mini Getting ta Yrs 
series is to encourage CPC users to use CPM 

Plus or, for the less fortunate, CPM 2.2. I ° h 

intend to take you through some simple exe- we 

rcises and examples to demonstrate that CPM 

does work and I personally consider it to be 

a far superior operating system than Amsdos C PU apm 


for the serious (business) user. 


FOR EASE OF UNDERSTANDING WHAT IS RRQUIKED WHEN ENTERING IN INSTRUCTIONS, 
CAPITAL LETTERS HAVE BEEN USED FOR THE COMPLETE WORD OR STRING OF WORDS. 


Often, when the first time user puts the CFM Flus System disc (but when I say 
System disc I mean a Copy and not the Master) into the machine amd types ,CFM, 
he or she does not know what to expect. After a littie disc activity the sign 
on Copyright message appears and then the all important A> prompt. Should the 
user now try to move the cursor using the cursor keys ali that is produced is 
continental characters. What we have to do 18 configure the keyboard. and the 
utility to use is SETKEYS.COM. 


If we now enter SETKEYS (as the COM extension is not needed) and press <ENTER> 
the computer should respond with ‘Cannot open file', not very helpful you must 
agree. We should have typed SETKEYS KEYS.CCP now when we press <ENTER> nothing 
appears to happen. we are just back at the A> prompt. However, we now have use 
of the the left and right cursor keys and the <CLR> key works correctly. 


If you want to look at the contents of KEYS.CCP, enter TYPE KEYS.CCP and a 
list of special control characters will appear on the screen. If you now load 
this file into your friendly word processor — PROTEXT in PROG mode is ideal — 
it is perfectly possible to alter it to configure the Keyboard to many useful 
combinations to suit yourself — however, writing new SETKEY files could well 
be the subject of a separate future articie. To get a print out of everything 
that is echoed to the screen, hold down the <CTRL> key and press 'P'. A beep 
will be emitted when activated and pressing <CTRL>'F' again stops printing. 


If for some reason you are a lousy typist and cannot spell and had entered 


SATKEYS KEYS.CCP, the computer would respond with SATKEYS? (another less than 
helpful comment). The question mark is CPM's way of telling you that it can't 
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find any file in the disc's directory which is called SATKEYS. A quick way to 
edit your mistake is to hold down the <CTRL> key and press 'W'. The last line 
you typed is repeated, now using the cursors keys edit in the normal way. and 
when you are happy with your entry press <ENTER> again. 


All the examples in this article will work on CPM Plus and some may also work 
under the less advanced CPM 2.2 (which is supplied with the DDI-1 disc drive). 


For the information of all 464 and 664 owners. CFM + will work on your 
machines, but you do need the dk'tronics 64K expansion pack, a copy of 


the specially patched version of C1@CPM3.EMS (the disc based file that 
makes up part of the operating system) and of course a DDI1 disc drive 
(664 owners, are there any left, don't need the disc drive). 


We can see that many CFM programs need a parameter after the file name. Try 
this, PALETTE 63 @ - the screen colours are now reversed. To return the screen 
to the default settings, type PALETTE @ 63. For ail those (un) lucky people who 
have colour monitors try PALETTE 21 @ — this. I consider. wiil make the screen 
easier to read. Owners of Mono monitors will in general, find using CPM kinder 
on the eyes because most professional programs are dome in Mode z2. Mind you on 
the CPC it is perfectly possible to have programs rumnming in Modes 9 & 1 under 
CPM, DISCKITS is an example of a Mede 1 file (to be truthful DISCKITS is not 4 
true CPM file as it jumps back into Amsdos so that ali available memory can be 
used when copying discs). 

It is time to try out a few more commands. Type RENAME and the program will 
respond with 'Enter New Name:'. At this prompt typé PROFILE.SUB and then press 
<ENTER>, the program now asks ‘Enter Olid Name:' now type FROFILE.ENG and press 
<ENTER>. If we type DIR{[FULL] we're presented with a complete catalogue of the 
files on the disc and can see that PROFILE.ENG has disappeared and PROFILE. SUB 
is in its place. 

Renaming files can be shortened to REN PROFILE. SUB=PROFILE.ENG. and once again 
if we enter TYPE PROFILE.SUB, a short list is presented which should look like 
this: 


A>type profile.sub 
setkeys keys.ccp 
language 3 


This is what is called a batch file and as long as a file called SUBMIT.COM 
is on the disc every time you initialise CPM with :CPM the two files SETKEYS & 
LANGUAGE will be run automatically. The '3' behind LANGUAGE indicates that the 
the keyboard and screen are set up for the Uk pound sign whenever the hash '#' 
or '£' keys are used. Once again, this PROFILE.SUB file is easy to alter using 
a text editor or word processor and contains all sorts of instructions. On my 


SuperCalc2, PCW 9512 Start of Day disc, iI have the PROFILE.SUB containing the 
following lines: 
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date set 
device lst:=par 
setdef m:,a:Corder=(sub,com) temporary=m: display] 
matrix a4 
palette 1 @ 
language 3 
setkeys keys.wp 
setist ukset.1ist 


pip This just goes to show you the complexity 
<m:=dattim.comftr] that can be achieved. The only thing that 
<m:=sc2.comlrd I have to enter is the date and time when 
<mi=sc2.hlpetr] asked. Two of the files in the above list 
<mi=sc2.ovl(r] that do not work on CPCs are MATRIX.COM & 
<mr =k. xgt CPMKEYS.COM. The other two, BASIC.COM and 
< RPED.BAS, were supplied to PCW users, but 
dir a:worki2k.calffulll] with a little bit of adaptation they will 
is work happily on the CPC machines. 

dattim 


sc? start 
<a 

ai 
comkeys 


basic rped 


And below are two more examples of SuperCalcz. The one of the left is as used 
on a CFC which is fitted with a doubie density 3.5 inch ‘B' drive. The one in 
the box on the right, is a FROFILE.SUB rile to auto run the same program ona 
Single drive CPC. 


ramdost+ di 
setdef b:,a:forder=(sub,com) temporary=b: display] 
Ds 

date set 
language 3 
setlist ukset.Iist 


setkeys keys.sc2 date set 

palette 63 @ language 3 

paper £66,16,g4,C,p an setist ukset.ist 
dattim setkeys keys.sc2 
dir worki2k.cal palette 63 @ 

sc2 start dattim 

<A dir work1i2x.cal 
lanquage © scz start 

setist usa_set.lst language & 

setkeys keys.ccp setist usa_set.ist 


basic rped setkeys.ccp 
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You will have noticed that I have used a number of utilities but I have not 
explained about their uses. Well I've decided to hold it over until next time, 
Just to gauge the feed back about the usefulness of this article. 

In conclusion, I do hope that I've encouraged some of you to dust off those 
system discs and have a dabble with CPM. Should you progress into the world of 
CPM Plus, it can offer software such as SuperCalc2 ~ probably the best spread— 
sheet for the Amstrad CPC's and PCW's. Databases like DBase2 and Condorl, and 
word processors such as CPM+ Protext and Newword 2 — if you use large capacity 
drives, these WPs will allow the creation of data files of over 200k in length, 
which should be enough to be going on with for most users!!! 


So there you have it folks. Let me know what you think. Do readers of PRINT-— 
OUT want to read this sort of article, I look forward to your comments. 


SMALL ADS 


FOR SALE — AMSTRAD CPC 464 INSTRUCTION MANUAL as new, £8 + £1 postage, or will 
exchange for four 3" discs. P.H. Hreckin, 161 Longsight Road, Holc— 
ombe Brook, Bury BL8 4DA. Phone @204-68-3443. 


FOR SALE - Over 75 Amstrad games. Mostly budget and compilations. Cost over 
£15@ to buy, sell for £35. Phone Alan (@3552) 24795. 


FOR SALE ~— Unwanted Amstrad games in perfect condition — Wizball £1.00, Super 
League £1.00, Peter Beardsley's International Football £1.08, or 
Duy the lot for £2.50. T. Kingsmill, 202 Park Street Lane, Park 
Street, St Albans, Hertfordshire AL2 2AQ. 


HOMEBREW - Homebrew adventures for sale — send for a list. T. Kingsmill, 202 
Park Street Lane, Park Street. St Albans, Hertfordshire AL2 2A0Q. 


2 MAGIC GAMES for only £3. Rebound and One Arm Bandit Simulator. Send cheques/ 
Postal Orders to Alan Scully, 119 Laurel Drive, Greenhills, East 
Kilbride, Glasgow. 


PUBLIC DOMAIN software for Amstrad CPC on cassette. For anyone who missed the 
article on CPD, you can receive FD for only z25p and a blank tape 


(& a SAE). Alan Scully, 119 Laurel Drive, Greenhills, East Kilbride, 
Glasgow G75 9JG. 


see p45 for more details 
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TECHNICAL TIPS 


Over the past two months we nave received quite a rew letters seeking advice 
and assistance with various probiems concerning the CPC. Some of them, we feel, 
will apply to many users amd so we have decided to print the solutions to them 
in ‘Techincal Tips’. 


Q. the first problem comes from TONY KINGSMILL of ST ALBANS who says :- 
‘I would be very grateful if you could tell me a way to turn off a ROM from 
BASIC or Machine Code. The reason for this is that I bought a speech ROM a few 
months aqo and have found that some games are not compatable with it. Therefore 
if you know a way so that I don't have to keep removing it I would be grateful. ' 


A. It is a well documented fact that some ROMs interfere with certain programs 
and one of these is the Dk'Tronics Speech Synthesiser ROM. The solution to this 
problem is to switch the ROM off; however, in order to avoid having to continu- 
ally remove and insert the ROM chip (not a gocd idea) you need a program to do 
this. Some ROMs include a : command to switch themselves (& any other ROMs off) 
but certain ones do not and for this reason we have written 'ROMSWITCH’ which 
allows you to turn off any particular ROM(s) or all the ROMs that are attached. 


{Fl 1@ ? ROMGSWITCH-LOGADER copyright R Tayior 1990 

[B3] 20 RESTORE:PRINT:PRINT''Please wait a few seconds" 

[16] 30 FOR lin=® TO &48/6-1:total=0:FOR n=8 TO 7:READ as 

[FQ] 4@ byte=VAL ("&'+aS) :POKE &BFOOt+]LinkG+n, byte 

C4B] S®@ total=total+byte:NEXT n 

[21] 6@ READ aS:IF VAL ('%' +a) <>total THEN PRINT:PRINT"Error in line"linkigt+i1g 
:END 

(C4) 7@ NEXT Lin 

[BB] 8@ PRINT:PRINT"Al] M/C loaded":PRINT:PRINT" Press 7S’ to save M/C as ROMSWT 
CH. BIN" :WHILE INKEYS="":WEND:TIF INKEY (60)<>-1 THEN SAVE “ROMSWTCH. BIN", 
B,&BFOO, &48 

C4D] 90 PRINT:PRINT"To Load and use ROMSWITCH just Enter: ":PRINT'LOAD'CHRS (34) " 
ROMSWTCH. BIN" CHRS (34) :PRINT' THEN Enter: ":PRINT'CALL &BFO@ C,list of ROM 
Ss required to be onl" 

CEA 100 IEND 

[30] 110 DATA 21,43, BF,77,B7,28,00,47, 200 

CD53 120 DATA 23,DD, 7E,90,77.DD,23,DD, 3D2 

C41] 130 DATA 23,10,F5,0E,00,21,1B.BF.231 

C71] 14@ DATA CD,16,BD,11,40,00,21,FF,311 

C40] 150 DATA AB, 3A,43,BF.B7,28,11,47,31E 

CE7] 160 DATA DD, 21,44,BF,C5,DD,4E,0U, SF 1 

C48) 170 DATA CD,CE,BC,DD,23,C1,10,F4.51C 

CE2] 18@ DATA 3E,C9,32,CB, BC, DF, 40, BF. 49E 

£49} 19@ DATA 06,CO, 00,035,907 ,06,02, 0, OD8 
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Before running the program you should save it and then follow the instructions. 
When RUN the program will save the machine code as ROMSWICH.BIN so that for use 
in the future just type LOAD "“ROMSWTCH.BIN" and follow the instructions below. 
The routine is now ready to use by CALLing &BF@@ followed by the numbers of the 
ROMs that you want left ON — all other ROMs will be disabled. eq CALL S&BF@,2,5 
will turn off all the ROMs except those that are in slots two and five. 
The list of ROMs required should be in ascending order so that their reinitial- 
isation will be in the order that the computer usually uses. Every ROM number 
should be separated from its neighbours and from the CALL S&BF@@ by a comma. If 
no ROMs are required, then just use CALL &BF@@. 
NB that this Machine Code routine will RESET the computer and any program that 
is present will be lost. 


Q. the next query comes from I.L.BYERS of LONDON who writes :- 
‘T am the owner of a 6128 and on 2 discs am unable to either RUN the programs or 
copy or format them. No mention in the manual to overcome the error message:' 
DISC ERROR 
TRACK @ SECTOR #4 


A.There is indeed no such message present in my AMSDOS ROM, although there is an 
undocumented 'Disc Fail' one hidden away at &CC78. Neither is there a string of 
‘Track' or ‘Sector in the ROM so I can only assume that the DISC ERROR message 
is coming from some program that you are running. As to the problem itself, it 
seems to me that you have a couple of damaged discs. which might be noticeable 
if you look at the surface while rotating the disc with the shutter pulled back 
{taking care not to touch the actual surface) It should be possible to transfer 
most of the other tracks and sectors from the 2 discs to new ones using a good 
Sector Editor. If you would like to send us the two discs and two new ones. we 
would be willing to try and do that for you. 


Q.Moving on we come to a quick query concerning light pens from ALAN SCULLY :- 
‘I would like to enquire as to whether you would happen to know the wiring code 
for the ‘Electric Studio’ light pen. I had a slight accident with mine; all the 
wires came out of the top (it is a short story but I will not bore you with the 
details), anyway, I would dearly like to get the light pen working again. ' 


A.wunfortunately, I do not own a light pen but if any of our readers know about it 
or have a copy of its wiring code, please send it in. My advice would be to get 
in touch with the manufacturers as they should be able to give you the informa— 
tion that you need. 
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Machine 
COMPARING WORDS & Code 


Acting on the outcome Sit eeeeeees 


Last issue. we looked at making decisions in Machine Code by using the compare 
(CP) command and the flags. You will have noticed that the compare instruction 
can only work with numbers and, indeed. the flags are set according to results 
of numerical calculations. You might be wondering, therefore, how you can make 
decisions which are based on words. Fortunately this can be done but. however, 
it is not quite as simple as using an IF...THEN...ELSE command in BASIC. 


You'll have read, in the first part of this tutorial, that we have to input 
a word & then see if it is the same as one that's held in memory. We've already 
worked out an inputting routine which gets a word from the user, and puts it in 
memory at an address labelled .store. Before we go any further, it 1s important 
to remember that the word will be held in memory as a series of numbers and not 
letters. These numbers will be the ASCII codes of the letters that they're rep- 
resenting. Thus the word AMSTRAD will be held in memory as the decimal numbers, 


65, 77,83, 84,82,65,68 or the hexadecimal numbers 41,4D,53,54,52,41,44. 


Therefore, a way to see if two words are the same is to compare the numbers 
that make up the words, & this is exactly what our program will do. The routine 
will need to know two things before it is called and they're the address of the 
word that has been inputted, and the address of the word with which it is to be 
checked. The former address should be loaded into DE and the latter into HL. 


Then, when the routine ig called. A will be loaded with the contents of the 
address pointed to by HL & this will be stored in B temporarily. A will then be 
loaded with the contents of the address pointed to by DE. At the end of this. B 
will hold the ASCII code of the first ietter of the checking word & A will con- 
tain the ASCII code of the first letter of the inputted word. Next. a normal CP 
instruction checks to see if the value in A equais the value in B —- if it does 
then the zero flaq will be set (since A minus B will equal zero if A and B are 
the same). The instruction JP NZ,wrong is only executed if the zero flag is not 
set (ie. A and B are not the same — A minus B does not equal zero). The subrou- 
tine, ‘.wrong', will then perform whatever action is necessary for an incorrect 
answer. But, if the program does not jump to .wrong. the routine adds 1 to both 
HL and DE so that they're pointing at the next letter in the two words. A check 
is now carried out in order to see if A equals zero (the end of word mark) & if 
it does. this means that the end of the word has been reached without an error 
occuring and so it jumps to the label. .right. If A doesn't equal zero, the end 
of the word has not been reached and so the comparison process is repeated. 


The program below will not work on its own because we have not inputted a word 
or included any subroutines for what happens when the words match or are diff- 
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erent. The reason that it is printed, is because it can easily be incorporated 
into any program of your own, providing you have assigned correct values to HL 
and DE as explained before. 


ORG &4000 $ program located at &400@ 
LD HL, test 3; HL holds the address of the inputted word 
LD DE,store ; DE holds the address of the word to check with 
CALL. check 3 call the checking routine 
RET s return to BASIC 
-check LD A, (HL) 3; load A with the value contained in address HL 
LD B,A ; B equals A 
LD A, (DE) 3 load A with the value contained in address DE 
CP 4,B ; see if A equals B (FLAGS = result of A-B) 
JP NZ,wrong 3; if A is different from B (zero fiag not set) 
3; jump to the subroutine calied .wrong 
INC HL 3 HL=HL+1 
INC DE 3; DE=DE+1 
CP A,®d 3; see if A equais @ (FLAGS = resuit aot A-Y) 
JP Z,right 3; if A equals @ (zero flag set) the jump to the 


3; subroutine called .right 


JP check otherwise jump back to the beginning 


we 


All that remains for us to do is to put togetner all of tne various modules 
that we have written to produce a proper program which works. The example below 
does this by asking a geographical question and getting the answer and checking 
it. This is the first completed program that we have looked at which does some— 
thing useful. From now on we will be writing far more complicated programs and 
won't be just sticking to text either. Hopefully, you are now writing programs 
of your own but don't worry if there not very good as Machine Code is extremely 
difficult to learn to program competentiy and takes time, patience and a little 
bit of luck. 

As a challenge for you, when you have run the program below and worked out 
how it works try and add more questions and turn it into a simple Machine Code 
testing program for anything that you fancied: all you need to do is change the 
questions and answers. Once you have done that. try adding a scoring system. 


Regular readers will have noticed that we have not included any numbers for 
use with the BASIC Poker. The reason for this is that due to the large quantity 
of numbers that would have to be used to enter the text, it would be too long & 
could not be printed next to the lines to which they refer. However, next issue 
we will hopefully include them again. 

I hope that you have found this article interesting and informative but if 
there's something else that you'd like to know, please feel able to write to us 
with your query. Until next time, have fun !!: 
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ORG &4008 
LD HL,mess1 
CALL print 
LD H_L,store 
LD B,®@ 

CALL input 
LD (HL),@ 
LD H_,test 
LD DE,store 
CALL check 
RET 


input 
CALL &BBO6 
CP 13 

RET Z 

CP 127 

JP 7,erase 
CALL &BBSA 
LD (HL),A 
TNC HL 

INC B 

LD A,B 

CP 15 

RET Z 

» duramy 

JP input 
-erase 

LD A,B 

CP @ 

JP Z, dummy 
DEC B 

DEC HL 

LD (HL) ,@ 
LD A,8 
CALL &BBSA 
LD A,32 
CALL &BBSA 
LD A,8 
CALL &BBSA 
JP dummy 


- check 

LD A, (HL) 
LD B.A 

LD A, (DE) 
CP A,B 

JP NZ,wrong 
INC HL 

INC DE 

CP AY 

JP Z.right 
JP check 


»wrong 
LD HL.mess2 
CALL print 
RET 


eriqht 

LD HU.messs 
CALL print 
RET 


sprint 

LD A, (HL) 
CP @ 

RET Z 

CALL &BBSA 
INC HL 

JP print 


.messl 


MiP Software 


SHAREWATCHER II — a superb stockmarket simulation 
which allows you to test your skills on the stockmarket without 
losing a fortunel! °,.,interesting and enjovable...’ said Printout 
issue 3. °...well worth considering.’ said WACCI Dec’€. 
Sherewatcher II costs £4.50 on tape and £7.50 on 4° disc. 


MATHS MASTER PLUS — is a comprehensive ccnputer 
utility packed with well over 100 useful formulae and conversions. 
It is simple to operate and is based ground two main menus. Included 
in the program are sections on volumes, areas, statistics, physics 
formulae, trig and much more. Just type in the figures you know, 
and the answer wil] be provided in seconds - its invalable for al] 
students. ’...excellent buy...’ said Printout issue 2. °...wel 
written useful...’ said AEM. Maths Mester Plus costs £3.95 
on tape and £6.95 on 3° disc. 


EDUCATIONAL PACK 1 -— this pack contains ten 
superb educational programs to suit ages 9-{4.4]] the programs have 
a mathematical] theme to them, and are simple to use, elihough an £4 
menual is included in the price.The programs included are fracions, 
ratios, series, addition and subtraction, and many nany more. Also 
for a limited period a copy of Maths Master will be given free. This 
program is the predecessor to the Maths Master Plus program shown 
above. This is superb buy at £5.95 on 3° disc or double tape pack. 


To order please send a cheaue or posta! order (payable to 4. Pinder) 
to MiP Software, 4 Wham Hey, New Longton, Preston, PR4 4¥U. 


DB "This program tests your Geography. What is the 


capital of Spain 7",@ 


.mess2 


DB 13,10,"WRONG. The capital of Spain is Macrid'",@ 


»messs 


DB 13,10, ""CORRECT. The capital of Spain is Madrid'’,@ 


» test 
DB Madrid" ,.@ 
.store 


News & Views 


jt has been quite an interesting couple of months as far as matters Amstrad 


are concerned both in the large scale and also the small companies which Print— 
Out tries to encourage. 


New AMSTRAD CONSOLE 


Now that the CPC 464 is six years old. the software houses' seem to be very 
interested by the prospect of a new range of CPC computers, including the often 
promised console version. Despite the deliberate lack of information concerning 
the new machines, many people are becoming very intriqued by what the computers 
will be capable of and what the differences between them and their predecessors 
are going to be - none more so than existing CPC owners, who are worrying as to 
whether they will be left out on a limb by Amstrad and software developers with 

However, as has already been seen with the CPC 6128. software companies are 
often reluctant to take advantage of the higher capabilities of upgraded models 
and so will want to write software that will work on the widest number of mach- 
ines. Admittedly, programs will be written specifically for these ‘super—CPCs ' 
and, in the sudden excitement of the new releases. software houses will be very 
anxious to gain a lead over their competitors as early as possible. 

Amstrad themselves are treading a very fine line between keeping supremacy 
in the &-bit market and badly hurting the existing CPC range. The main question 
is whether Amstrad intends the new CPCs to be replacements or additions to the 
464/664/6128. If it is the former, you cannot help but think that maybe they've 
left it too late — after all, nobody could deny that the Amiga and other 16-bit 
computers are superior in terms of capabilities to the CPC. However in my opin- 
ion the CPCs still represent the best value-for-money & they have a iot of life 
left in them. So therefore Amstrad will want to keep the large CPC user base (& 
its software) and at the same time provide a new alternative to the 16-bit com- 
puters of today. 

When you consider that over 2 million CPCs have been sold, it seems fairly 
stupid for Amstrad to discontinue it; even if Amstrad did, the CPC wouldn't die 
for it has so many users that software would continue to be produced & a whole 
host of small companies would spring up, all run by users. The BBC Micro 1s an 
excellent example of this, despite the lack of support by its manufacturers for 
several years now, it still has a magazine every month and a limited amount of 
software is produced for it. 

Until Amstrad announce the actual details of the machines later this year, 
probably around September, the rest of us will have to wait to hear what these 
computers are able to do. One thing is certain, Amstrad's announcement on its 
console and 'super-CPCs' will ultimately affect the future of our 464s, 6645 & 
61285 in one way or another. Let us hope the decision is a wise one. 
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ACU for Sale 


It was revealed last month that Amstrad Computer User was up for sale after 
the company who print it ran into severe difficulties and is now working under 
receivership. The kindest thing to do may be to let ACU die as its poor content 
is reflected in its dwindling readership. Whether any other company is willing 
to risk trying to restore ACU to some of its former glory 15 unknown. Though it 
would be ironic if the 'official' Amstrad magazine was about to disappear, just 
as Amstrad prepare to launch a new range of CPC computers. 


ADVENTURES improved 


Tony Kingsmill, author of ‘Lords of Magic’ and ‘Island of Chaos’ (reviewed 
in Issue Four). has now managed to iron out a couple of bugs in these programs 
which will allow them to run on both the CPC 464 and 6128. He has also removed 
a number of spelling errors from his programs and this will have improved their 
quality considerably. Print-Out has also learnt that a new adventure 1s on the 
way. Called ‘Revenge of Chaos’ it is the sequel to ‘island of Chaos’ and in the 
game Baktron has returned and once more you will have to do battle with him. It 
is not expected to be released for a couple of months but we'll bring you more 
details when they are available. 

We can also inform you that Tony is preparing a PD Library for the CPC on 
disc at present and it will hopefully be operational sometime soon — we'll give 
more information when the library is open. 


PD on DISC 


It seems that CPC owners have never had it so good!!! More and more small 
companies are setting up, especially in the FD field. Last issue we brought you 
news of CPD (a cassette public domain library) run by Alan Scully. We can tell 
you that CPD has expanded to aiso cover disc software and has changed its name 
to SCULL PD - of course the cassette side of things has not been forgotten. In 
this issue, we include an article on the new services & we can vouch for their 
excellence — if you're into PD it's well worth a look. 


We are always looking for new writers, programmers or artists to help 
with PRINT~OUT. We are especially interested in articles on topics 
such as BASIC programming, hardware projects, business software, 
other languages. uses of CPCs and machine code programming. 


If you are interested in helping with any of these things 
or anything else then please write to this address :— 


PRINT-OUT, 8 MAZE GREEN ROAD, BISHOP'S STORTFORD, 
HERTFORDSHIRE CMZ3 2PJ. 
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LOCO by Anthony Millbourne 


This program was written by Anthony Millbourne and it was his entry into the 
competition which we ran in Issue Two of the magazine; it won him second place. 
The object of the game is to try and stop the train coming off the tracks & to 
do this you have to move pieces of track around the screen so that there aren't 
any dead ends or breaks in the track. Unfortunately there's only one free place 
on the screen (the rest of the screen is filled up with random bits of track) & 
the only way to move a piece of track, is to position your cursor over a bit of 
track next to the hole and press fire. The piece of track will then be moved to 
the place where the gap was. The train moves around the track (shown by a piece 
of a different colour) and your qame ends when it becomes derailed. Good Luck! ! 


ESA} 18 MODE 1: INK 1,24: 1NK 3,621NK 2,18: INK @, 1:PEN t 
Trit$="M"s LFtS="N"sup$="A"s dwn$="2"s Firge" " 

{ADJ 20 SYMBOL AFTER 220:FOR n=1 TO 32 

{8A} 3@ READ a,b,c,d,e,f,9,h 

142] 40 SYMBOL 225+n,a,b,c,d,e,f,q,h:NEXT 

(07) 5@ DIM block (20, 10) :yx=10s yy=5:sx=2:sy=2 

{991 60 CLS:LOCATE 13,2:PRINT "WHICH LEVEL 2" 


{98] 7@ 1=8:LOCATE 1,8:PRINT " Easy } 
Medium 2 Hard 3" 
(83} 8@ PRINT “ DEFINE 
KEYS" 


{2D} 90 LOCATE 22,1:PRINT "<#>" 

{CBI 1@@ k$=UPPER$ CINKEY$) : IF k#="" THEN GOTO 160 

£92] 110 IF JOY(@) AND 1 AND 1)8 OR k$=up$ AND 1>8 THEN LOCATE 22,1: PR 
INT ° ":J=1-2 

{0B} 12@ IF JO¥(@) AND 2 AND 1414 OR kS=dun$ AND 1414 THEN LOCATE 22,1 
PRINT" "st=142 

[BC] 13@ IF JOY(@) AND 16 OR JOY(@) AND 32 OR k$=firs THEN GOTO 159 

(D4) 148 GOTO 70 

[BB] 15@ IF 1=8 THEN sp=4@ 

(05) 160 IF 1=1@ THEN sp=30 

[DB} 17@ IF 1=12 THEN sp=20 

[96] 180 IF 1=14 THEN GOTO 1250 

[2B] 190 kG=""s CLS: yx=10t yy=S:sx=2:sy=2 

{D9} 20@ FOR n=! TO 1@:FOR a=} TO 20 

{701 21@ block (a,n)=CINT (RNDRS) + 

{1E} 220 IF a=1 THEN block(a,n)=6 

{6D} 23@ IF a=1 AND n=) THEN block(a,n)=1 

{D5} 24@ LOCATE at2-1,n%2-1:PRINT CHRS$ (block (a,n) #44224) +CHRS (block (a, 
nh) 844225) :LOCATE at2-1 nt 2:PRINT CHR$ (block (a,n}#4+226) +CHRS ( 
block (a,n)%4#227) 

CAE} 25@ NEXT a,n 

(6B) 26@ PEN 2:LOCATE 1,21:PRINT STRINGS (4@, 207) 

[4A} 278 LOCATE 1,22:PRINT CHRS(207):LOCATE 40,22:PRINT CHR$(207) 

(00) 286 LOCATE 1,23:PRINT STRING$(40,207):PEN 1 

(49) 270 txel:ty=16:thxatstby=tl:t=t9:sc=16 

(87) 30@ block(sx,sy)=@:LOCATE sx#2-1,sy82-1:PRINT " ":LOCATE sxt2-}, 
syt2:PRINT ° " 

{981 S1@ PEN S:LOCATE 3,22:PRINT "¢L0COt 
LOCATE 33, 22:PRINT "*#LOCOe" 

{A4] 326 IF sc>10@@ THEN GOTO 1146 

{F2] 330 GOSUB 780 

£63] 340 PEN S:LOCATE yxt2-1, yy#2-1:PRINT CHRE (block (yx, yy) #4+224)4CHR 


SCORE “ssc: 


# {block (yx, yy} #4+225) sLOCATE yxt2-1, yy82:PRINT CHR$ (block (yx, 
yy} 444226) +CHRS (block (yx, yy) £44227) 

(531 350 PEN A:LOCATE yx#2-1,yy#2-1:PRINT CHR$ (block (yx, yy) #44224) CHR 
S{block (yx, yy) #4#225) LOCATE yx#2-1, yy82sPRINT CHR$ {block (yx, 
vy} 444226) +CHE$ (block (yx, yy) #44227) 

{87] 360 IF yx=tx AND yy=ty THEN GOTO 1176 

L20] S7@ kS=UPPERS (INKEY$): IF x$="" THEN GOTO 360 

(64) 386 IF JOV(@) AND 1 AND yy>! OR k$=up$ AND yy>t THEN yy=yy-} 

LGA] S9@ IF JOY(@) AND 2 AND yy<1@ OR k$=dwn$ AND yy(1@ THEN yy=yyt! 

(64) 400 IF JOY(@) AND 8 AND yx<20 OR kG=rit$ AND yx¢2@ THEN yx=yxtt 

C70] 446 IF JOY(@) AND 4 AND yx>! OR kS=]4t8 AND yx>1 THEN yx=yx-1 

(FB) 420 IF JOY(@) AND 15 OR JOY(@) AND 32 OR k$=fir$ THEN GOSUB 740 

TF9] 43@ GOTO So 

{hE} 446 DATA &00, £00, £60, 468, £00, £00, 600, 400 

£701 45@ DATA £00, £00, £06, £60, £60, £00, 400, 406 

172] 460 DATA &60, £00, £60, £00, £00, £00, £00, £00 

174] 476 DATA £06,460, £06, £00, £00, £00, £00, £00 

(061 480 DATA &00, £68, £06, 100, &O0, £03, 04, £04 

[56] 496 DATA &00, £00, 400, 81F, 2EO, £00, £00, 800 

{82} 50@ DATA &8,&0B, £68, &10, &10,&10, 410,810 

19D] S10 DATA &60, £60, £00, £02, £63, 04, 208, £08 

[31] 520 DATA £00, £00, £00, £0, LIF, 400, 400, £00 

C2E] 536 DATA £00,200, 606, £00, £00, LO, &20, &20 

{3B} 548 DATA &00, £00, KG, £00, £00, &20, 810, 416 

{7E} 55 DATA &10,&16,&16,&08, 468, £68, 408, £08 

£32] 560 DATA &10, &10, &10, &10, &16, £08, £08, £08 

TED] 57@ DATA &B, £08, £04, £03, £60, £00, £00, £00 

{23} 38@ DATA &04, &04,&03, 400, £06, £00, 406, 400 

C5F] 596 DATA &00, £00, K00, &EO, RIF, 400, £00, &60 

{3D] 660 DATA &10, &10,&2, £CO, £00, £00,400, &00 

[F3] 610 DATA £08, 808, 408, £68, 408, &10, 416, &10 

TAb] 620 DATA &00, &00, £66, £07, &FB, £00, k00, &00 

[6B] 63¢ DATA &20,%26, &C0, 60, £60, £00, £00, k00 

[5A] 64@ DATA &60, £00, £00, LFF, £00, £00,400, £00 

[50] 650 DATA &6¢, £60, 400, FF, &00, £00, £00, £00 

CGE] 660 DATA &60, £00, &60, £00, FF, £00, 400, 400 

(101 670 DATA £00, &00, £60, k00, LFF, £00, 400, £00 

(40) 686 DATA &10, &10, &10, &10, £10, £16,410, 810 

[FA] 670 DATA £68, £68, £08, £68, £08, £0, 408, &@8 

(311 700 DATA &10,&10,&10,&10, &10, &10, 410,410 

LEB] 71@ BATA &08, £08, £08, £08, £08, £08, £09, £08 

(74) 720 DATA &10,&10,&10, 8FO, £60, £00, £00, 00 

[FF] 730 DATA &08, £08, £08, LOF, 460, 400, £60, £60 


[BC] 740 DATA £00,800, £00,400, 8F0, 410, &10, 410 
{BB} 750 DATA £60, %00, k00, £00, L0F , 208, £08, £08 


(85) 


760 IF yy=sy+i AND yx=sx OR yy=sy-1 AND yx=sx OR yxesxt! AND yy= 
sy OR yx=sx-1 AND yy=sy THEN GOTO 770 ELSE RETURN 


TEC) 77@ block (sx,sy)=block (yx, yy) :LOCATE sx#2-1,syt2-i:PRINT CHR$ (blo 


(34) 
(FB) 


(8F] 


ck (sx, sy) 444224) +CHR$ (block (sx, sy) #4+225) LOCATE sxt2-1,sy#2: 
PRINT CHRS (block (sx, sy} #4+226) +CHR$ (block (sx, sy) t4#227) sblock 
(yx, yy) =O: sx=yxisy=yy: RETURN 

786 t=ttitIF tsp THEN t=@ ELSE RETURN 

796 PEN U:LOCATE txt2-1,ty#2-1:PRINT CHRS (block (tx, ty) #4+224) +CHR 
W block (tx, ty) #44225) LOCATE txk2-f, tyt2:PRINT CHR (block (tx, 
ty) #44226) +CHRS (block (tx, ty) #4+227) 

BOO IF block(tx,ty)=! THEN GOTO 88¢ 


(87) 810 IF block(tx,ty)=2 THEN GOTO 700 


{12] 


82¢ IF block{tx,ty)=3 THEN GOTO 92¢ 


{6D} 830 IF block(tx,ty)=4 THEN GOTO 940 


[08] 


B40 IF blockitx,ty)=5 THEN GOTO 96@ 


£23] 850 IF block{tx,ty)=6 THEN GOTO 960 


182] 
[FF] 
(40) 
{63} 
{07} 
{F4] 
(D3) 
(FQ) 
1A3] 
{FC} 
[15] 
106) 
{713 
(04) 
(4D) 
{FQ} 
{30} 
[BA] 
{203 
{16] 


{SE 
[B} 


et 


{44} 
£63] 


(2E] 
{97} 


{@5] 


B66 IF blockitx,tyl=7 THEN GOTG 1660 

B70 END 

BRO IF thx=tyt) THEN GOTO 1116 ELSE GOTO 165¢ 

89¢ END 

70@ IF thx=tx-1 THEN GOTD 1116 ELSE GOTD 1690 

91@ END 

920 iF thx=txtt THEN GOTO 167¢@ ELSE GOTO 1056 

936 END 

940 IF tbx=ty-1 THEN GOTO 1@7@ ELSE GOTO 1696 

930 END 

960 IF tbx=tx+1 THEN GOTD 1098 ELSE GOTO 1650 

970 END 

980 IF tby=ty+) THEN GOTO 1076 ELSE GOTO 1116 

998 END 

100@ IF thx=txt1 THEN GOTO 1098 

1016 IF tbx=tx-1 THEN GOTO 165¢ 

1020 IF tby=ty+! THEN GOTO 1070 

1030 IF thy=ty-1 THEN GOTO 1116 

104@ END 

1050 thx=tx:tby=ty:txetxti:lF tx2@ OR block{tx,tyl=! OR block (tx 
yty)=3 OR block (tx, ty)=6 OR blockitx,tyl=@ THEN GOTO 1176 

1060 GOTO 1120 

1076 thx=tx:thysty:ty=ty-1sIF ty(t OR block(tx,tyJ=3 OR block(tx, 
ty}=4 GR block (tx, tyi=5 OR block (tx, ty)=@ THEN GOTO 1170 

108@ GOTO 1128 

1090 tbxeturtby=tystxetx-1iF tx) OR block (tx, ty)=2 08 block (tx, 
ty)=4 OR block (tx, ty)=6 OR block(tx,ty)=@ THEN GOTO 1178 

110@ GOTO 1126 

16 thx=terthy=tystystytisIF ty21@ OR block (tx, tyl=1 OR block (tx 
ytyJ=2 OR block(tx,ty=5 OR block(tx,ty)=@ THEN GOTO 117¢ 

1126 PEN S:LOCATE tx¥2-1,ty82-1:PRINT CHRS (block (tx, ty) £4+224)4CH 
RS (block (tx, ty) #4+225) LOCATE tx#2-1, ty82:PRINT CHR¢ (block (t 


x, Ly) 844226) CHRS (block (tx, ty) #44227) 
(9B) 1150 sc=sct(50-sp) :RETURN 
69] 1140 PEN 2:CLS:LOCATE 16, 10:PRINT "NEXT LEVEL {1° 
[213 {156 IF INKEY$="" THEN GOTO 1150 
(57) 116@ PEN Issp=sp-5:G070 396 


lLinechecker 


A PROGRAM TYPING AID 


All programs in Print-Out have 
Linecheck codes which are enc— 
losed in brackets at the start 
of a line. Don't enter them in 
as they're designed to be used 
with Linechecker to eliminate 
errors when typing in programs 
which appear in this magazine. 
Please note, all programs will 
run whether Linechecker is be— 
ing used or not. For informat— 
ion on how to use Linechecker, 
please see Issue Three. 


(FE 1170 GLS:PEN 2:LOCATE 8,4 
[003 $180 PRINT ° HHNee oF oH of BEHHE 
# oH HH HH BEE # Hat 
Hea HHaHE FH EA OH 
# OR a HE RRRHEE fA HH BHRER": 
(DED 1190 PRINT:PRINT:PRUWT Bhead HH RE HGH 
q Hake # 4 # # 
aa tite 4d tHe Hae 
f Goh t of # ht 
a 


(97) 120@ IF INKEY$="" THEN GOTO 1200 

(84) Z21@ PEN 1:6010 6 

(ODI 1256 CLS:LOCATE 1, 2:PRINT * 

(OB) 1260 LOCATE 1,8: INPUT “RIGHT “sraits 

(78) 1270 LOCATE 1,10:INPUT “LEFT "rifts 

(43) 1286 LOCATE 1,42: ENPUT "uP 

{857 1290 LOCATE 1,14: 7NPUT "DOWN "sdwng 

{BE} 1295 LOCATE 1,16:INPUT "FIRE ":firs 

{OE} 1300 ritS=UPPERS(r its) s }At$=UPPERS (1 Ft$) :up$=UPPER$(up$) : 
dun$=UPPERS (aun$): Fir$=UPPERS (£1r$):60T0 6¢ 


DEFINE KEYS" 


W : ups 


Offers 


Please make all cheques payable 
to Print-Out but any postal orders 
should be made out to T J Defoe as 
this saves the Post Office a great 
deal of time and effort. Unless it 
cannot be avoided, it is advisable 
not to send cash through the post. 
All orders should be sent to :- PRINT-OUT, Special Offers. 8 Maze Green Road. 

Bishop's Stortford, Hertfordshire CM23 2PJ. 


Issue 6 


If you wish to order a copy of Issue 5ix in advance, you may do so by sending 
a cheque / postal order for £1.1@ (or 7@p + an Ad SAE with a 2&p stamp} to the 
usual address. We hope to have it published by about the Seth July & as soon as 
it is printed it will be forwarded to you. 


Program tapes and discs 


We now supply both program tapes and discs for ALL issues and the prices given 
below also include a booklet to explain how the programs work plus postage and 
packing. Tapes & discs are available for Issues One, Two, Three, Four & Five. 
The cost for a program tape is as follows :— 
a) A blank tape (at least 15 minutes) and 5@p (ptp) 
or b) £1.00 (which also includes tne price of a tape) 
The cost for a program disc is :- 
a) A blank formatted disc and 5¥p (ptp) 
or b) £3.@@ (which also includes the cost of a MAXELL/AMSOFT disc) * 


* When ordering using this particular method. please allow about i4 days for 
delivery as we must rely on outside suppliers for the discs. 


Back issues 


We still have some copies of Issues 1, 2. 3 and 4 available and the price is 
£1.1@ which includes postage and packing. Alternatively, you can order both a 
back issue and its corresponding tape or disc by sending :- 
a) £1.75 - includes the tape, the required issue and postage and packing 
b) £3.75 — includes the disc (genuine MAXELL/AMSOFT disc) & the required 
issue and postage and packing. 
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SPECIAL OFFERS INFORMATION 


Send to: Print—Out, 8 Maze Green Road, 
Bishop's Stortford, Herts. 


ADDRESS = . «ek pen ei OS oak ieee ia eieishelais does Geese ae Bale yons 


Ce Oy 


i 


Please send me the following items :- 


DESCRIPTION ISSUE NUMBER QUANTITY PRICE EACH PRICE 


TOTAL PRICE 


I enclose a cheque/postal order/cash* to the value of £....... Please make all 
cheques payable to PRINT-OUT and make postal orders out to Thomas Defoe. Thank 
you. (*delete as applicable) 


Subscription 


_—— 


If you are interested in having a subscription to Print-—Out you will be glad 
to know that full details concerning subscriptions are printed on the next page. 
We are running two types of subscription — half-yearly (three issues) and also 
yearly (six issues) at the prices of £3.30 and £6.60 respectively. 


Advertising 


You can place a small ad of upto 40 words (including your name and address) 
in this section of the magazine free of charge. If you wish to place a larger 
advertisement in the magazine, please write to us for a full list of advertis— 
ing rates. 
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SUBSCRIPTION INFORMATION 


Subscription @ffer 


Due to the many enquiries that we have received concerning subscriptions we 
have now introduced a subscription service and it will be operating from Issue 
Five. There are two forms of subscription :- 

a) Three issues - approxiamately half a year 

b) Six issues -— approxiamately a full year 
Although we do try and produce one magazine every two months this is not always 
possible due to other outside engagements and therefore exact release dates are 
not given in the magazine. Because of this, we are unable to quarantee that six 
issues will be produced in a year, or three issues in half a year. However, for 
a year's subscription you will be sent six issues no matter when they are publ- 
ished, and the same applies to a half-yearly subscription. If we stop producing 
the magazine, we promise to refund the cost of all unmailed issues. 

The prices for subscriptions to Print-—Out are as follows :- 


NO OF ISSUES UNITED KINGDOM EUROPE REST OF THE WORLD 
SINGLE £1.10 £1.50 £2.00 / £2,50* 
THREE ISSUES £3.30 £4.50 £6.00 / £7,50* 
SIX ISSUES £6.60 £9.00 £12.00 / £15.00% 


* The first price quoted is for ‘Printed Paper Rate' but this does not have the 
same level of security as a normal letter or parcel. The second price mentioned 
is for normal rate and is sent in the same way as an ordinary letter or parcel. 
For the United Kingdom there is an alternative price for ordering only a single 
issue and this is:- 70p + a large A4 SAE (with 28p stamp). We try to despatch 
all orders within a week of receiving them & all items are sent by SECOND CLASS 
post, unless the extra money or stamps are sent with your order. 


rrr re erent 


Send to: Print-Out, 8 Maze Green Road, 


Subscriptions Bishop's Stortford, Herts. 


ADDER Ss: iiie ewer aoe Sihiar Matera vic tates Ways karate ton ee Iacu ed go hie 


2 2 


Please send me the next three/six* issues of Print-—Out as soon as they are 
published. I enclose a cheque/postal order* to the value of £....... and I 
wish my subscription to start from Issue ........ (* delete as applicable) 
Please make CHEQUES payable to PRINT-OUT and make postal orders payable to 
Thomas Defoe (as this saves time and effort for the Post Office !!!). 
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